comparison lisp/mail/mailabbrev.el @ 49171:e0c2ecbf4fc5

(Commentary): Use command remapping instead of substitute-key-definition.
author Andreas Schwab <schwab@suse.de>
date Sun, 12 Jan 2003 20:48:49 +0000
parents 29a49406ad9d
children d6c91e697cdc d7ddb3e565de
comparison
equal deleted inserted replaced
49170:fffd84e47253 49171:e0c2ecbf4fc5
1 ;;; mailabbrev.el --- abbrev-expansion of mail aliases 1 ;;; mailabbrev.el --- abbrev-expansion of mail aliases
2 2
3 ;; Copyright (C) 1985, 86, 87, 92, 93, 96, 1997, 2000, 2002 3 ;; Copyright (C) 1985, 86, 87, 92, 93, 96, 1997, 2000, 2002, 2003
4 ;; Free Software Foundation, Inc. 4 ;; Free Software Foundation, Inc.
5 5
6 ;; Author: Jamie Zawinski <jwz@lucid.com>, now <jwz@jwz.org> 6 ;; Author: Jamie Zawinski <jwz@lucid.com>, now <jwz@jwz.org>
7 ;; Maintainer: FSF 7 ;; Maintainer: FSF
8 ;; Created: 19 Oct 90 8 ;; Created: 19 Oct 90
109 ;; type SPC at the end of the abbrev before moving away) then you can do 109 ;; type SPC at the end of the abbrev before moving away) then you can do
110 ;; 110 ;;
111 ;; (add-hook 111 ;; (add-hook
112 ;; 'mail-mode-hook 112 ;; 'mail-mode-hook
113 ;; (lambda () 113 ;; (lambda ()
114 ;; (substitute-key-definition 'next-line 'mail-abbrev-next-line 114 ;; (define-key mail-mode-map [remap next-line] 'mail-abbrev-next-line)
115 ;; mail-mode-map global-map) 115 ;; (define-key mail-mode-map [remap end-of-buffer] 'mail-abbrev-end-of-buffer)))
116 ;; (substitute-key-definition 'end-of-buffer 'mail-abbrev-end-of-buffer
117 ;; mail-mode-map global-map)))
118 ;; 116 ;;
119 ;; If you want multiple addresses separated by a string other than ", " then 117 ;; If you want multiple addresses separated by a string other than ", " then
120 ;; you can set the variable mail-alias-separator-string to it. This has to 118 ;; you can set the variable mail-alias-separator-string to it. This has to
121 ;; be a comma bracketed by whitespace if you want any kind of reasonable 119 ;; be a comma bracketed by whitespace if you want any kind of reasonable
122 ;; behaviour. 120 ;; behaviour.