diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2014-03-08 23:26:20 +0100 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2014-03-08 23:26:20 +0100 |
| commit | e7db54476d83d155fffb25fdec89f09224970a44 (patch) | |
| tree | f36b3a5b6c9eaba8b6ae0c7a0a6e8f2d4ebd449b /lisp/frameset.el | |
| parent | 7359e7a8325d3ca6fa7bfd201917d08d1f9c4b9f (diff) | |
| download | emacs-e7db54476d83d155fffb25fdec89f09224970a44.tar.gz emacs-e7db54476d83d155fffb25fdec89f09224970a44.tar.bz2 emacs-e7db54476d83d155fffb25fdec89f09224970a44.zip | |
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.el | 2 |
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 |