(mh-get-new-mail): Always use mh-inc-prog, never `inc'.

1 files changed, 3 insertions, 3 deletions

diff --git a/lisp/mail/mh-e.el b/lisp/mail/mh-e.el
index 67cb9a1a960..502e42c5870 100644
--- a/lisp/mail/mh-e.el
+++ b/lisp/mail/mh-e.el
@@ -52,7 +52,7 @@
 ;;; Modified by James Larus, BBN, July 1984 and UCB, 1984 & 1985.
 ;;; Rewritten for GNU Emacs, James Larus 1985.  larus@ginger.berkeley.edu
 ;;; Modified by Stephen Gildea 1988.  gildea@lcs.mit.edu
-(defconst mh-e-RCS-id "$Header: /home/fsf/rms/e19/lisp/RCS/mh-e.el,v 1.2 1994/04/13 20:42:10 rms Exp rms $")
+(defconst mh-e-RCS-id "$Header: /home/fsf/rms/e19/lisp/RCS/mh-e.el,v 1.3 1994/07/18 18:04:45 rms Exp rms $")
 
 ;;; Code:
 
@@ -850,8 +850,8 @@ The value of mh-folder-mode-hook is called when a new folder is set up."
                                 "-file" (expand-file-name maildrop-name)
                                 "-width" (window-width)
                                 "-truncate")
-            (mh-exec-cmd-output "inc" nil
-                                "-width" (window-width)))
+          (mh-exec-cmd-output mh-inc-prog nil
+                              "-width" (window-width)))
         (message
          (if maildrop-name
              (format "inc %s -file %s...done" folder maildrop-name)