(fancy-splash-screens): Set emulation-mode-map-alists

to nil while displaying slash screen.

diff --git a/lisp/startup.el b/lisp/startup.el
index 601d281cea9af8112a29d4f080c2db898d997a5e..6fdd4fa49991b6ceb64b72d7911fc184b85c6740 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1333,6 +1333,7 @@ mouse."
        (fancy-splash-outer-buffer (current-buffer))
        splash-buffer
        (old-minor-mode-map-alist minor-mode-map-alist)
+       (old-emulation-mode-map-alists emulation-mode-map-alists)
        (frame (fancy-splash-frame))
        timer)
     (save-selected-window
@@ -1351,6 +1352,7 @@ mouse."
              (setq cursor-type nil
                    display-hourglass nil
                    minor-mode-map-alist nil
+                   emulation-mode-map-alists nil
                    buffer-undo-list t
                    mode-line-format (propertize "---- %b %-"
                                                 'face '(:weight bold))
@@ -1362,7 +1364,8 @@ mouse."
              (recursive-edit))
          (cancel-timer timer)
          (setq display-hourglass old-hourglass
-               minor-mode-map-alist old-minor-mode-map-alist)
+               minor-mode-map-alist old-minor-mode-map-alist
+               emulation-mode-map-alists old-emulation-mode-map-alists)
          (kill-buffer splash-buffer))))))
 
 (defun fancy-splash-frame ()