diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-06-27 23:11:51 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-06-27 23:11:51 +0000 |
| commit | 7e766510d2656dd2e82afabae4b393974d6a1b01 (patch) | |
| tree | 5b04e77d0a5b1d10da715fb5aa70fa2584f89de3 | |
| parent | 857615335fe57ffb554bc2422487ce882f001dc8 (diff) | |
| download | emacs-7e766510d2656dd2e82afabae4b393974d6a1b01.tar.gz | |
(command-line) <handling LANG>: Change 9 to 5, not 5 to 9.
(command-line-1): Fix mouse startup message.
| -rw-r--r-- | lisp/startup.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index 32fe585682c..f3d4e6d5031 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -516,8 +516,8 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'." (when (and ctype (string-match iso-8859-n-locale-regexp ctype)) (let (charset (which (match-string 1 ctype))) - (if (equal "5" which) - (setq which "9")) + (if (equal "9" which) + (setq which "5")) (setq charset (concat "latin-" which)) (when (string-match "latin-[12345]" charset) ;; Set up for this character set. @@ -829,7 +829,7 @@ If this is nil, no message will be displayed." (if (assq 'display (frame-parameters)) (progn (insert "\ -The menu bar above is sufficient for basic editing with the mouse. +The menu bar and scroll bar are sufficient for basic editing with the mouse. Useful Files menu items: Exit Emacs (or type Control-x followed by Control-c) |