comparison lisp/frame.el @ 35697:6f48576daf85

(frame-initialize): Doc fix.
author Eli Zaretskii <eliz@gnu.org>
date Mon, 29 Jan 2001 17:01:13 +0000
parents 72f9f4beaf6f
children e20f7bc75418
comparison
equal deleted inserted replaced
35696:09e4ea04f401 35697:6f48576daf85
165 165
166 ;;; startup.el calls this function before loading the user's init 166 ;;; startup.el calls this function before loading the user's init
167 ;;; file - if there is no frame with a minibuffer open now, create 167 ;;; file - if there is no frame with a minibuffer open now, create
168 ;;; one to display messages while loading the init file. 168 ;;; one to display messages while loading the init file.
169 (defun frame-initialize () 169 (defun frame-initialize ()
170 "Create an in initial frame if necessary." 170 "Create an initial frame if necessary."
171 ;; Are we actually running under a window system at all? 171 ;; Are we actually running under a window system at all?
172 (if (and window-system (not noninteractive) (not (eq window-system 'pc))) 172 (if (and window-system (not noninteractive) (not (eq window-system 'pc)))
173 (progn 173 (progn
174 ;; Turn on special-display processing only if there's a window system. 174 ;; Turn on special-display processing only if there's a window system.
175 (setq special-display-function 'special-display-popup-frame) 175 (setq special-display-function 'special-display-popup-frame)