emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] trunk r113476: lisp/desktop.el: Correctly restore iconifie


From: Juanma Barranquero
Subject: [Emacs-diffs] trunk r113476: lisp/desktop.el: Correctly restore iconified frames.
Date: Sun, 21 Jul 2013 02:42:26 +0000
User-agent: Bazaar (2.6b2)

------------------------------------------------------------
revno: 113476
revision-id: address@hidden
parent: address@hidden
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Sun 2013-07-21 04:42:11 +0200
message:
  lisp/desktop.el: Correctly restore iconified frames.
  (desktop--filter-iconified-position): New function.
  (desktop-filter-parameters-alist): Add entries for `top' and `left'.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/desktop.el                desktop.el-20091113204419-o5vbwnq5f7feedwu-591
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-07-20 19:29:02 +0000
+++ b/lisp/ChangeLog    2013-07-21 02:42:11 +0000
@@ -1,3 +1,9 @@
+2013-07-21  Juanma Barranquero  <address@hidden>
+
+       * desktop.el: Correctly restore iconified frames.
+       (desktop--filter-iconified-position): New function.
+       (desktop-filter-parameters-alist): Add entries for `top' and `left'.
+
 2013-07-20  Glenn Morris  <address@hidden>
 
        * progmodes/gdb-mi.el (gdb-delete-handler, gdb-stopped):

=== modified file 'lisp/desktop.el'
--- a/lisp/desktop.el   2013-07-15 00:07:51 +0000
+++ b/lisp/desktop.el   2013-07-21 02:42:11 +0000
@@ -896,10 +896,12 @@
     (foreground-color  . desktop--filter-*-color)
     (fullscreen                . desktop--filter-save-desktop-parm)
     (height            . desktop--filter-save-desktop-parm)
+    (left              . desktop--filter-iconified-position)
     (minibuffer                . desktop--filter-minibuffer)
     (name              . t)
     (outer-window-id   . t)
     (parent-id         . t)
+    (top               . desktop--filter-iconified-position)
     (tty               . desktop--filter-tty*)
     (tty-type          . desktop--filter-tty*)
     (width             . desktop--filter-save-desktop-parm)
@@ -1004,6 +1006,11 @@
             (cons (car current) val))))
        (t t)))
 
+(defun desktop--filter-iconified-position (_current parameters saving)
+  ;; When saving an iconified frame, top & left are meaningless,
+  ;; so remove them to allow restoring to a default position.
+  (not (and saving (eq (cdr (assq 'visibility parameters)) 'icon))))
+
 (defun desktop-restore-in-original-display-p ()
   "True if saved frames' displays should be honored."
   (cond ((daemonp) t)


reply via email to

[Prev in Thread] Current Thread [Next in Thread]