Mercurial > emacs

changeset 1360:9cb1a4b90b5c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Cleaned up rmail-first-unseen-message.
author Joseph Arceneaux <jla@gnu.org>
date Wed, 07 Oct 1992 19:25:24 +0000
parents 96c43cee31f1
children a45cf4b36ce9
files lisp/mail/rmail.el
diffstat 1 files changed, 1 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmail.el	Wed Oct 07 09:09:19 1992 +0000
+++ b/lisp/mail/rmail.el	Wed Oct 07 19:25:24 1992 +0000
@@ -1264,14 +1264,9 @@
 	    (prefix-numeric-value current-prefix-arg))))
   (rmail-search regexp (- (or n -1))))
 
-(defun glofp ()
-  (interactive)
-  (let ((new (1+ (string-to-int (buffer-substring (1- (point)) (point))))))
-    (backward-delete-char 1)
-    (insert (int-to-string new))))
-
 ;; Show the first message which has the `unseen' attribute.
 (defun rmail-first-unseen-message ()
+  (rmail-maybe-set-message-counters)
   (let ((current 1)
 	found)
     (save-restriction