diff options
| author | Richard M. Stallman | 1995-12-26 04:38:27 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-12-26 04:38:27 +0000 |
| commit | 31d87daa5baa0fdecdb1c15d844e3cb2a8c01a37 (patch) | |
| tree | f7f304c1298877ab5370d29cd77d305611793303 | |
| parent | 1f5b1641369d2bda6bd3470b1da3aea10c7b3f64 (diff) | |
| download | emacs-31d87daa5baa0fdecdb1c15d844e3cb2a8c01a37.tar.gz emacs-31d87daa5baa0fdecdb1c15d844e3cb2a8c01a37.zip | |
When turning on default settings,
preserve iso-accents-enable if it's already set.
| -rw-r--r-- | lisp/international/iso-acc.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/international/iso-acc.el b/lisp/international/iso-acc.el index 0febc122ec5..ae8aace6344 100644 --- a/lisp/international/iso-acc.el +++ b/lisp/international/iso-acc.el | |||
| @@ -327,7 +327,11 @@ Noninteractively, this operates on text from START to END." | |||
| 327 | (insert (car (cdr (car entry))))) | 327 | (insert (car (cdr (car entry))))) |
| 328 | (forward-char 1))))))) | 328 | (forward-char 1))))))) |
| 329 | 329 | ||
| 330 | (iso-accents-customize "default") | 330 | ;; Set up the default settings, but don't override |
| 331 | ;; iso-accents-enable if the user has already set it. | ||
| 332 | (let ((old iso-accents-enable)) | ||
| 333 | (iso-accents-customize "default") | ||
| 334 | (if old | ||
| 335 | (setq iso-accents-enable old))) | ||
| 331 | 336 | ||
| 332 | ;;; iso-acc.el ends here | 337 | ;;; iso-acc.el ends here |
| 333 | |||