mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 16:51:06 -07:00
Code Issues Projects Releases Wiki Activity

Doc fix for x-win-suspend-error

Browse source 
* lisp/term/w32-win.el (x-win-suspend-error):
* lisp/term/x-win.el (x-win-suspend-error): Sync docs.
This commit is contained in:
Glenn Morris 2014-04-11 00:02:28 -07:00
parent 9b1ac3be88
commit fd49216611
3 changed files with 9 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2014-04-11 Glenn Morris <rgm@gnu.org>
* term/w32-win.el (x-win-suspend-error):
* term/x-win.el (x-win-suspend-error): Sync docs.
2014-04-10 Stefan Monnier <monnier@iro.umontreal.ca>
Ediff's overlay priorities cause more trouble than they solve.

3
lisp/term/w32-win.el
View file

@ -206,7 +206,8 @@ European languages which are distributed with Windows as
See the documentation of `create-fontset-from-fontset-spec' for the format.")
(defun x-win-suspend-error ()
"Report an error when a suspend is attempted."
"Report an error when a suspend is attempted.
This returns an error if any Emacs frames are X frames, or always under W32."
(error "Suspending an Emacs running under W32 makes no sense"))
(defvar dynamic-library-alist)

2
lisp/term/x-win.el
View file

@ -1326,6 +1326,8 @@ Request data types in the order specified by `x-select-request-type'."
;;; Window system initialization.
(defun x-win-suspend-error ()
"Report an error when a suspend is attempted.
This returns an error if any Emacs frames are X frames, or always under W32."
;; Don't allow suspending if any of the frames are X frames.
(if (memq 'x (mapcar 'window-system (frame-list)))
(error "Cannot suspend Emacs while running under X")))