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

to nil while displaying slash screen.

1 files changed, 4 insertions, 1 deletions

diff --git a/lisp/startup.el b/lisp/startup.el
index 601d281cea9..6fdd4fa4999 100644
--- 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 ()