diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2001-05-17 11:52:45 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2001-05-17 11:52:45 +0000 |
| commit | e85e809a5cfa42daef145676557dd377d166494b (patch) | |
| tree | 93dd0b9d2040d4da8371e105a4175102c9f70f0b /lisp | |
| parent | 2ca0d5f1130631c099b865185fc3257331209b6f (diff) | |
| download | emacs-e85e809a5cfa42daef145676557dd377d166494b.tar.gz emacs-e85e809a5cfa42daef145676557dd377d166494b.tar.bz2 emacs-e85e809a5cfa42daef145676557dd377d166494b.zip | |
(fancy-splash-screens): Ignore events on the mode-line.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/startup.el | 5 |
2 files changed, 5 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7608adc8f89..cc5e9071802 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2001-05-17 Gerd Moellmann <gerd@gnu.org> + * startup.el (fancy-splash-screens): Ignore events on the mode-line. + * net/ange-ftp.el (ange-ftp-write-region): Make sure to record the last coding system used before calling set-buffer-modified-p because that function changes last-coding-system. diff --git a/lisp/startup.el b/lisp/startup.el index 4006ca70092..84266811be1 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -1181,11 +1181,12 @@ where FACE is a valid face specification, as it can be used with (use-local-map map) (define-key map [t] 'fancy-splash-default-action) (define-key map [mouse-movement] 'ignore) + (define-key map [mode-line t] 'ignore) (setq cursor-type nil display-hourglass nil buffer-undo-list t - mode-line-format - (propertize "---- %b %-" 'face '(:weight bold)) + mode-line-format (propertize "---- %b %-" + 'face '(:weight bold)) fancy-splash-stop-time (+ (float-time) (max 60 fancy-splash-max-time)) timer (run-with-timer 0 fancy-splash-delay |