Mercurial > emacs
changeset 14720:52a6ccf7c0a8
(iso-languages): Add ~? and ~!.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 29 Feb 1996 19:22:05 +0000 |
parents | d477c6f756df |
children | 2630ac774647 |
files | lisp/international/iso-acc.el |
diffstat | 1 files changed, 11 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/iso-acc.el Thu Feb 29 08:19:46 1996 +0000 +++ b/lisp/international/iso-acc.el Thu Feb 29 19:22:05 1996 +0000 @@ -135,6 +135,7 @@ (?\~ (?A . ?\303) (?C . ?\307) (?D . ?\320) (?N . ?\321) (?O . ?\325) (?T . ?\336) (?a . ?\343) (?c . ?\347) (?d . ?\360) (?n . ?\361) (?o . ?\365) (?t . ?\376) (?> . ?\273) (?< . ?\253) (?\~ . ?\270) + (?! . ?\241) (?? . ?\277) (?\ . ?\~)) (?\/ (?A . ?\305) (?E . ?\306) (?O . ?\330) (?a . ?\345) (?e . ?\346) (?o . ?\370) (?\/ . ?\260) (?\ . ?\/)))) @@ -348,4 +349,14 @@ ;; Set up the default settings. (iso-accents-customize "latin-1") +;; Use Iso-Accents mode in the minibuffer +;; if it was in use in the previous buffer. +(defun iso-acc-minibuf-setup () + (setq iso-accents-mode + (save-excursion + (set-buffer (window-buffer minibuffer-scroll-window)) + iso-accents-mode))) + +(add-hook 'minibuf-setup-hook 'iso-acc-minibuf-setup) + ;;; iso-acc.el ends here