* (gnus-setup-for-offline): Add default value.

diff --git a/lisp/gnus-ofsetup.el b/lisp/gnus-ofsetup.el
index 3cce4c8..73bb60f 100644 (file)
--- a/lisp/gnus-ofsetup.el
+++ b/lisp/gnus-ofsetup.el
@@ -1,6 +1,6 @@
 ;;; gnus-ofsetup.el --- Setup advisor for Offline reading for Mail/News.
 ;;;
-;;; $Id: gnus-ofsetup.el,v 1.1.4.3 1999-02-03 06:45:06 yamaoka Exp $
+;;; $Id: gnus-ofsetup.el,v 1.1.4.4 1999-02-03 22:11:10 yamaoka Exp $
 ;;;
 ;;; Copyright (C) 1998 Tatsuya Ichikawa
 ;;; Author: Tatsuya Ichikawa <t-ichi@po.shiojiri.ne.jp>
@@ -220,8 +220,9 @@
                          '(("pop" 1) ("apop" 2)) nil t nil))
                    (islisp (y-or-n-p "Do you use pop3.el to fetch mail? ")))
                (if (not islisp)
-                   (let ((prog (read-file-name "movemail program name: "))
-                         (args (read-from-minibuffer "movemail options: ")))
+                   (let ((prog (read-file-name "movemail program name: "
+                                               exec-directory "movemail"))
+                         (args (read-from-minibuffer "movemail options: " "-pf")))
                      (setq mail-source
                            (append mail-source
                                    (list