598 |
(setq this-command 'end-of-buffer) |
(setq this-command 'end-of-buffer) |
599 |
(end-of-buffer arg)) |
(end-of-buffer arg)) |
600 |
|
|
601 |
(define-key mail-mode-map "\C-c\C-a" 'mail-abbrev-insert-alias) |
(eval-after-load "sendmail" |
602 |
(define-key mail-mode-map "\e\t" ; like lisp-complete-symbol |
'(progn |
603 |
'mail-abbrev-complete-alias) |
(define-key mail-mode-map "\C-c\C-a" 'mail-abbrev-insert-alias) |
604 |
|
(define-key mail-mode-map "\e\t" ; like lisp-complete-symbol |
605 |
|
'mail-abbrev-complete-alias))) |
606 |
|
|
607 |
;;(define-key mail-mode-map "\C-n" 'mail-abbrev-next-line) |
;;(define-key mail-mode-map "\C-n" 'mail-abbrev-next-line) |
608 |
;;(define-key mail-mode-map "\M->" 'mail-abbrev-end-of-buffer) |
;;(define-key mail-mode-map "\M->" 'mail-abbrev-end-of-buffer) |