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)