Fix interactive spec in netrc-parse

* lisp/net/netrc.el (netrc-parse): Fix placement of interactive
spec (bug#38773).

diff --git a/lisp/net/netrc.el b/lisp/net/netrc.el
index 93152f4f2c4326e632164ae5ffb0ef1b8054c811..cd351ed7e43be0c5e3bc45f61a31d0ceaf73df40 100644 (file)
--- a/lisp/net/netrc.el
+++ b/lisp/net/netrc.el
@@ -49,8 +49,8 @@
 (defvar netrc-cache nil)
 
 (defun netrc-parse (&optional file)
-  (interactive "fFile to Parse: ")
   "Parse FILE and return a list of all entries in the file."
+  (interactive "fFile to Parse: ")
   (unless file
     (setq file netrc-file))
   (if (listp file)