Mercurial > emacs
comparison lisp/startup.el @ 83438:dc3a189e9e3a
Fix splash screen loosing input events on Emacsclient frames.
* lisp/startup.el (fancy-splash-screens): Use `overriding-local-map'
instead of `overriding-terminal-local-map' for now; the latter doesn't
work right, it looses keypresses to another terminal.
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-478
| author | Karoly Lorentey <lorentey@elte.hu> |
|---|---|
| date | Fri, 30 Dec 2005 06:15:47 +0000 |
| parents | c415fd182aef |
| children | 00c55c52afd8 |
comparison
equal
deleted
inserted
replaced
| 83437:c415fd182aef | 83438:dc3a189e9e3a |
|---|---|
| 1332 (setq tab-width 20) | 1332 (setq tab-width 20) |
| 1333 (setq splash-buffer (current-buffer)) | 1333 (setq splash-buffer (current-buffer)) |
| 1334 (catch 'stop-splashing | 1334 (catch 'stop-splashing |
| 1335 (unwind-protect | 1335 (unwind-protect |
| 1336 (let* ((map (make-sparse-keymap)) | 1336 (let* ((map (make-sparse-keymap)) |
| 1337 (overriding-terminal-local-map map) | 1337 (overriding-local-map map) |
| 1338 ;; Catch if our frame is deleted; the delete-frame | 1338 ;; Catch if our frame is deleted; the delete-frame |
| 1339 ;; event is unreliable and is handled by | 1339 ;; event is unreliable and is handled by |
| 1340 ;; `special-event-map' anyway. | 1340 ;; `special-event-map' anyway. |
| 1341 (delete-frame-functions (cons 'fancy-splash-delete-frame | 1341 (delete-frame-functions (cons 'fancy-splash-delete-frame |
| 1342 delete-frame-functions))) | 1342 delete-frame-functions))) |