diff --git a/emacs/guix-base.el b/emacs/guix-base.el
index a2bd5bf7f21a3f8d218e6ab08192c24d62935840..d9c70aae9e1623cc2eb001398bf057acc16f2905 100644
--- a/emacs/guix-base.el
+++ b/emacs/guix-base.el
@@ -1186,10 +1186,11 @@ The function is called with a single argument - a command line string."
 (defun guix-pull (&optional verbose)
   "Run Guix pull operation.
 If VERBOSE is non-nil (with prefix argument), produce verbose output."
-  (interactive)
+  (interactive "P")
   (let ((args (and verbose '("--verbose"))))
     (guix-eval-in-repl
-     (apply #'guix-make-guile-expression 'guix-pull args)
+     (apply #'guix-make-guile-expression
+            'guix-command "pull" args)
      nil 'pull)))
 
 (provide 'guix-base)