mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-23 07:19:15 +00:00
* term/ns-win.el:
* version.el (emacs-version): * loadup.el: * frame.el (make-frame-on-display): Check for ns instead of ns-windowing.
This commit is contained in:
parent
89e87059eb
commit
601fb9b822
@ -1,5 +1,11 @@
|
||||
2008-07-23 Dan Nicolaescu <dann@ics.uci.edu>
|
||||
|
||||
* term/ns-win.el:
|
||||
* version.el (emacs-version):
|
||||
* loadup.el:
|
||||
* frame.el (make-frame-on-display): Check for ns instead of
|
||||
ns-windowing.
|
||||
|
||||
* dired.el (dired-mode-map): Show the key binding for wdired.
|
||||
|
||||
* menu-bar.el (menu-bar-file-menu): Show the key binding for
|
||||
|
@ -611,7 +611,7 @@ is not considered (see `next-frame')."
|
||||
"Make a frame on X display DISPLAY.
|
||||
The optional second argument PARAMETERS specifies additional frame parameters."
|
||||
(interactive "sMake frame on display: ")
|
||||
(if (featurep 'ns-windowing)
|
||||
(if (featurep 'ns)
|
||||
(progn
|
||||
(when (and (boundp 'ns-initialized) (not ns-initialized))
|
||||
(setq x-display-name display)
|
||||
|
@ -214,7 +214,7 @@
|
||||
(if (featurep 'mac-carbon)
|
||||
(progn
|
||||
(load "term/mac-win")))
|
||||
(if (featurep 'ns-windowing)
|
||||
(if (featurep 'ns)
|
||||
(progn
|
||||
(load "emacs-lisp/easymenu") ;; for platform-related menu adjustments
|
||||
(load "term/ns-win")))
|
||||
|
@ -39,7 +39,7 @@
|
||||
;;; Code:
|
||||
|
||||
|
||||
(if (not (featurep 'ns-windowing))
|
||||
(if (not (featurep 'ns))
|
||||
(error "%s: Loading ns-win.el but not compiled for GNUStep/MacOS"
|
||||
(invocation-name)))
|
||||
|
||||
|
@ -65,7 +65,7 @@ to the system configuration; look at `system-configuration' instead."
|
||||
((featurep 'gtk)
|
||||
(concat ", GTK+ Version " gtk-version-string))
|
||||
((featurep 'x-toolkit) ", X toolkit")
|
||||
((featurep 'ns-windowing)
|
||||
((featurep 'ns)
|
||||
(format ", *Step %s" ns-version-string))
|
||||
((boundp 'mac-carbon-version-string)
|
||||
(concat ", Carbon Version " mac-carbon-version-string))
|
||||
|
Loading…
Reference in New Issue
Block a user