[Emacs-diffs] trunk r116708: lisp/frameset.el: Avoid computing frame-list unnecessarily.

[Juanma Barranquero]

------------------------------------------------------------
revno: 116708
revision-id: address@hidden
parent: address@hidden
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Sat 2014-03-08 23:26:20 +0100
message:
  lisp/frameset.el: Avoid computing frame-list unnecessarily.
  (frameset-restore): When no frame is visible, do not generate
  a list of frames, just make visible the selected one.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/frameset.el               frameset.el-20130802043218-tfwraxv1c2zlibpw-1

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2014-03-08 06:56:22 +0000
+++ b/lisp/ChangeLog    2014-03-08 22:26:20 +0000
@@ -1,3 +1,8 @@
+2014-03-08  Juanma Barranquero  <address@hidden>
+
+       * frameset.el (frameset-restore): When no frame is visible, do not
+       generate a list of frames, just make visible the selected one.
+
 2014-03-08  Dmitry Gutov  <address@hidden>
 
        * vc/vc-git.el (vc-git-command): Turn FILE-OR-LIST into nil when

=== modified file 'lisp/frameset.el'
--- a/lisp/frameset.el  2014-03-05 16:22:47 +0000
+++ b/lisp/frameset.el  2014-03-08 22:26:20 +0000
@@ -1204,7 +1204,7 @@
 
     ;; Make sure there's at least one visible frame.
     (unless (or (daemonp) (visible-frame-list))
-      (make-frame-visible (car (frame-list))))))
+      (make-frame-visible (selected-frame)))))
 
 
 ;; Register support