summaryrefslogtreecommitdiff
path: root/lisp/frameset.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2014-03-08 23:26:20 +0100
committerJuanma Barranquero <lekktu@gmail.com>2014-03-08 23:26:20 +0100
commite7db54476d83d155fffb25fdec89f09224970a44 (patch)
treef36b3a5b6c9eaba8b6ae0c7a0a6e8f2d4ebd449b /lisp/frameset.el
parent7359e7a8325d3ca6fa7bfd201917d08d1f9c4b9f (diff)
downloademacs-e7db54476d83d155fffb25fdec89f09224970a44.tar.gz
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.
Diffstat (limited to 'lisp/frameset.el')
-rw-r--r--lisp/frameset.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/frameset.el b/lisp/frameset.el
index 6fd23f739ae..d6742d89632 100644
--- a/lisp/frameset.el
+++ b/lisp/frameset.el
@@ -1204,7 +1204,7 @@ All keyword parameters default to nil."
;; 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