Mercurial > emacs
comparison lisp/mail/mailabbrev.el @ 4034:9e585b42806d
(mail-abbrev-end-of-buffer): Fix interactive spec to "P", same as
end-of-buffer.
author | Roland McGrath <roland@gnu.org> |
---|---|
date | Thu, 08 Jul 1993 21:14:43 +0000 |
parents | 7a8d0a08eac7 |
children | 267b027a8692 |
comparison
equal
deleted
inserted
replaced
4033:431bc7d22c70 | 4034:9e585b42806d |
---|---|
546 Leave mark at previous position. | 546 Leave mark at previous position. |
547 With arg N, put point N/10 of the way from the true end. | 547 With arg N, put point N/10 of the way from the true end. |
548 | 548 |
549 Don't use this command in Lisp programs! | 549 Don't use this command in Lisp programs! |
550 \(goto-char (point-max)) is faster and avoids clobbering the mark." | 550 \(goto-char (point-max)) is faster and avoids clobbering the mark." |
551 (interactive "p") | 551 (interactive "P") |
552 (if (looking-at "[ \t]*\n") (expand-abbrev)) | 552 (if (looking-at "[ \t]*\n") (expand-abbrev)) |
553 (setq this-command 'end-of-buffer) | 553 (setq this-command 'end-of-buffer) |
554 (end-of-buffer arg)) | 554 (end-of-buffer arg)) |
555 | 555 |
556 (define-key mail-mode-map "\C-c\C-a" 'mail-interactive-insert-alias) | 556 (define-key mail-mode-map "\C-c\C-a" 'mail-interactive-insert-alias) |