Mercurial > emacs

comparison lisp/frame.el @ 404:f6c751f07c4a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Michael I. Bushnell <mib@gnu.org>
date Tue, 20 Aug 1991 20:21:23 +0000
parents 5bd386d1a1cc
children a24ab90a6983
comparison
equal deleted inserted replaced
403:87dbe63c61d8 404:f6c751f07c4a
97 (delete-screen terminal-screen) 97 (delete-screen terminal-screen)
98 (setq terminal-screen nil)) 98 (setq terminal-screen nil))
99 99
100 ;; No, we're not running a window system. Arrange to cause errors. 100 ;; No, we're not running a window system. Arrange to cause errors.
101 (setq screen-creation-function 101 (setq screen-creation-function
102 (lambda (parameters) 102 (function
103 (error 103 (lambda (parameters)
104 "Can't create multiple screens without a window system."))))) 104 (error
105 "Can't create multiple screens without a window system."))))))
105 106
106 ;;; startup.el calls this function after loading the user's init file. 107 ;;; startup.el calls this function after loading the user's init file.
107 ;;; If we created a minibuffer before knowing if we had permission, we 108 ;;; If we created a minibuffer before knowing if we had permission, we
108 ;;; need to see if it should go away or change. Create a text screen 109 ;;; need to see if it should go away or change. Create a text screen
109 ;;; here. 110 ;;; here.