Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
004f057a
Commit
004f057a
authored
Jun 10, 1996
by
Richard M. Stallman
Browse files
(frame-initialize): Don't count MSDOS neither as
window-system nor as a terminal frame here.
parent
753a134f
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
9 additions
and
8 deletions
+9
-8
lisp/frame.el
lisp/frame.el
+9
-8
No files found.
lisp/frame.el
View file @
004f057a
...
...
@@ -152,7 +152,7 @@ These supersede the values given in `default-frame-alist'.")
(
defun
frame-initialize
()
;; Are we actually running under a window system at all?
(
if
(
and
window-system
(
not
noninteractive
))
(
if
(
and
window-system
(
not
noninteractive
)
(
not
(
eq
window-system
'pc
))
)
(
progn
;; Turn on special-display processing only if there's a window system.
(
setq
special-display-function
'special-display-popup-frame
)
...
...
@@ -191,13 +191,14 @@ These supersede the values given in `default-frame-alist'.")
;; No, we're not running a window system. Use make-terminal-frame if
;; we support that feature, otherwise arrange to cause errors.
(
setq
frame-creation-function
(
if
(
fboundp
'make-terminal-frame
)
'make-terminal-frame
(
function
(
lambda
(
parameters
)
(
error
"Can't create multiple frames without a window system"
)))))))
(
or
(
eq
window-system
'pc
)
(
setq
frame-creation-function
(
if
(
fboundp
'make-terminal-frame
)
'make-terminal-frame
(
function
(
lambda
(
parameters
)
(
error
"Can't create multiple frames without a window system"
))))))))
;;; startup.el calls this function after loading the user's init
;;; file. Now default-frame-alist and initial-frame-alist contain
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment