Commit 64ced394 authored by Juri Linkov's avatar Juri Linkov
Browse files

* lisp/frame.el (toggle-frame-maximized, toggle-frame-fullscreen):

Use fullboth as an alias for fullscreen.  Suggested by Jan Djärv in
<http://lists.gnu.org/archive/html/emacs-devel/2013-01/msg00203.html>.
parent 5f9eccc4
2013-01-30 Juri Linkov <juri@jurta.org>
* frame.el (toggle-frame-maximized, toggle-frame-fullscreen):
Use fullboth as an alias for fullscreen. Suggested by Jan Djärv in
<http://lists.gnu.org/archive/html/emacs-devel/2013-01/msg00203.html>.
2013-01-30 Stefan Monnier <monnier@iro.umontreal.ca>
 
* progmodes/make-mode.el (makefile-backslash-region): Don't compute
......
......@@ -1666,7 +1666,7 @@ so the frame will go to the right maximization state
after disabling fullscreen mode.
See also `toggle-frame-fullscreen'."
(interactive)
(if (eq (frame-parameter nil 'fullscreen) 'fullscreen)
(if (memq (frame-parameter nil 'fullscreen) '(fullscreen fullboth))
(modify-frame-parameters
nil
`((maximized
......@@ -1690,10 +1690,10 @@ See also `toggle-frame-maximized'."
(modify-frame-parameters
nil
`((maximized
. ,(unless (eq (frame-parameter nil 'fullscreen) 'fullscreen)
. ,(unless (memq (frame-parameter nil 'fullscreen) '(fullscreen fullboth))
(frame-parameter nil 'fullscreen)))
(fullscreen
. ,(if (eq (frame-parameter nil 'fullscreen) 'fullscreen)
. ,(if (memq (frame-parameter nil 'fullscreen) '(fullscreen fullboth))
(if (eq (frame-parameter nil 'maximized) 'maximized)
'maximized)
'fullscreen)))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment