comparison lisp/frame.el @ 1821:04fb1d3d6992

JimB's changes since January 18th
author Jim Blandy <jimb@redhat.com>
date Tue, 26 Jan 1993 01:58:16 +0000
parents c77a852fda5f
children 6f55c76b5789
comparison
equal deleted inserted replaced
1820:b95bdb97c3e8 1821:04fb1d3d6992
111 ;;; startup.el calls this function after loading the user's init file. 111 ;;; startup.el calls this function after loading the user's init file.
112 ;;; If we created a minibuffer before knowing if we had permission, we 112 ;;; If we created a minibuffer before knowing if we had permission, we
113 ;;; need to see if it should go away or change. Create a text frame 113 ;;; need to see if it should go away or change. Create a text frame
114 ;;; here. 114 ;;; here.
115 (defun frame-notice-user-settings () 115 (defun frame-notice-user-settings ()
116 (if (live-frame-p frame-initial-frame) 116 (if (frame-live-p frame-initial-frame)
117 (progn 117 (progn
118 ;; If the user wants a minibuffer-only frame, we'll have to 118 ;; If the user wants a minibuffer-only frame, we'll have to
119 ;; make a new one; you can't remove or add a root window to/from 119 ;; make a new one; you can't remove or add a root window to/from
120 ;; an existing frame. 120 ;; an existing frame.
121 ;; NOTE: default-frame-alist was nil when we created the 121 ;; NOTE: default-frame-alist was nil when we created the