diff options
| -rw-r--r-- | lisp/mail/rmail.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 4c4fa39aa70..95e25add522 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -1264,14 +1264,9 @@ Interactively, empty argument means use same regexp used last time." (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 |