[Emacs-diffs] Changes to emacs/lisp/mh-e/mh-e.el

[D . Goel]

Index: emacs/lisp/mh-e/mh-e.el
diff -c emacs/lisp/mh-e/mh-e.el:1.21 emacs/lisp/mh-e/mh-e.el:1.22
*** emacs/lisp/mh-e/mh-e.el:1.21        Wed Aug 10 19:40:23 2005
--- emacs/lisp/mh-e/mh-e.el     Sun Sep 18 12:48:32 2005
***************
*** 734,740 ****
                     (apply 'mh-write-msg-to-file msg (cdr 
mh-last-destination)))
                   (mh-next-msg interactive-flag)
                   (format "Destination: %s" (cdr mh-last-destination)))))
!     (message output)))
  
  (defun mh-quit ()
    "Quit the current MH-E folder.
--- 734,740 ----
                     (apply 'mh-write-msg-to-file msg (cdr 
mh-last-destination)))
                   (mh-next-msg interactive-flag)
                   (format "Destination: %s" (cdr mh-last-destination)))))
!     (message "%s" output)))
  
  (defun mh-quit ()
    "Quit the current MH-E folder.
***************
*** 778,789 ****
          (if (mh-in-show-buffer (mh-show-buffer)
                (pos-visible-in-window-p (point-max)))
              (progn
!               (message (format
!                         "End of message (Type %s to read %s undeleted 
message)"
!                         (single-key-description last-input-event)
!                         (if (equal mh-next-direction 'backward)
!                             "previous"
!                           "next")))
                (setq mh-page-to-next-msg-flag t))
            (scroll-other-window arg)))
      (mh-show)))
--- 778,789 ----
          (if (mh-in-show-buffer (mh-show-buffer)
                (pos-visible-in-window-p (point-max)))
              (progn
!               (message 
!                "End of message (Type %s to read %s undeleted message)"
!                (single-key-description last-input-event)
!                (if (equal mh-next-direction 'backward)
!                    "previous"
!                  "next"))
                (setq mh-page-to-next-msg-flag t))
            (scroll-other-window arg)))
      (mh-show)))