[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/mh-e/mh-e.el
From: |
D . Goel |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/mh-e/mh-e.el |
Date: |
Sun, 18 Sep 2005 08:48:36 -0400 |
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)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/mh-e/mh-e.el,
D . Goel <=