(fancy-splash-screens): Make cursor-type buffer-local in splash
authorChong Yidong <cyd@stupidchicken.com>
Fri, 23 Feb 2007 16:26:28 +0000 (16:26 +0000)
committerChong Yidong <cyd@stupidchicken.com>
Fri, 23 Feb 2007 16:26:28 +0000 (16:26 +0000)
screen.

lisp/startup.el

index e2a8008..5be0e98 100644 (file)
@@ -1388,6 +1388,7 @@ the user caused an input event that is bound in `special-event-map'"
        (save-selected-window
          (select-frame frame)
          (switch-to-buffer " GNU Emacs")
+         (make-local-variable 'cursor-type)
          (setq splash-buffer (current-buffer))
          (catch 'stop-splashing
            (unwind-protect