aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2013-08-04 02:58:32 +0200
committerJuanma Barranquero2013-08-04 02:58:32 +0200
commit51d30f2c72ebe83f451928afba5665fad5cc9742 (patch)
treeaedd98df4ee8bca8ce7ee8ca0dbf057225a8b52a
parent5414a28349ac68be10ef077a59933ce677fd785e (diff)
downloademacs-51d30f2c72ebe83f451928afba5665fad5cc9742.tar.gz
emacs-51d30f2c72ebe83f451928afba5665fad5cc9742.zip
lisp/frameset.el: Fix typos and autoload cookies.
(frameset-p, frameset-save): Fix autoload cookies. (frameset-filter-minibuffer): Doc fix. (frameset-restore): Fix autoload cookie. Fix typo in docstring.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/frameset.el10
2 files changed, 9 insertions, 5 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ae54e4d526e..15e0ad745b1 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
12013-08-04 Juanma Barranquero <lekktu@gmail.com> 12013-08-04 Juanma Barranquero <lekktu@gmail.com>
2 2
3 * frameset.el (frameset-p, frameset-save): Fix autoload cookies.
4 (frameset-filter-minibuffer): Doc fix.
5 (frameset-restore): Fix autoload cookie. Fix typo in docstring.
6
3 * desktop.el (desktop-clear): Only delete frames when called 7 * desktop.el (desktop-clear): Only delete frames when called
4 interactively and desktop-restore-frames is non-nil. Doc fix. 8 interactively and desktop-restore-frames is non-nil. Doc fix.
5 (desktop-read): Set desktop-saved-frameset to nil. 9 (desktop-read): Set desktop-saved-frameset to nil.
diff --git a/lisp/frameset.el b/lisp/frameset.el
index 914ef5306cb..63ee9af23fc 100644
--- a/lisp/frameset.el
+++ b/lisp/frameset.el
@@ -71,7 +71,7 @@
71This is a deep copy done with `copy-tree'." 71This is a deep copy done with `copy-tree'."
72 (copy-tree frameset t)) 72 (copy-tree frameset t))
73 73
74;;;autoload 74;;;###autoload
75(defun frameset-p (frameset) 75(defun frameset-p (frameset)
76 "If FRAMESET is a frameset, return its :version. 76 "If FRAMESET is a frameset, return its :version.
77Else return nil." 77Else return nil."
@@ -179,7 +179,7 @@ Useful as a filter function for tty-specific parameters."
179 (not (string-match-p "^unspecified-[fb]g$" (cdr current))))) 179 (not (string-match-p "^unspecified-[fb]g$" (cdr current)))))
180 180
181(defun frameset-filter-minibuffer (current _filtered _parameters saving) 181(defun frameset-filter-minibuffer (current _filtered _parameters saving)
182 "Convert (minibuffer . #<window>) parameter to (minibuffer . t)." 182 "When saving, convert (minibuffer . #<window>) parameter to (minibuffer . t)."
183 (or (not saving) 183 (or (not saving)
184 (if (windowp (cdr current)) 184 (if (windowp (cdr current))
185 '(minibuffer . t) 185 '(minibuffer . t)
@@ -302,7 +302,7 @@ FRAME-LIST is a list of frames."
302 'frameset--mini 302 'frameset--mini
303 (cons nil id))))))) 303 (cons nil id)))))))
304 304
305;;;autoload 305;;;###autoload
306(cl-defun frameset-save (frame-list &key filters predicate properties) 306(cl-defun frameset-save (frame-list &key filters predicate properties)
307 "Return the frameset of FRAME-LIST, a list of frames. 307 "Return the frameset of FRAME-LIST, a list of frames.
308If nil, FRAME-LIST defaults to all live frames. 308If nil, FRAME-LIST defaults to all live frames.
@@ -547,11 +547,11 @@ Minibufferless frames must go first to avoid errors when attempting
547to delete a frame whose minibuffer window is used by another frame." 547to delete a frame whose minibuffer window is used by another frame."
548 (not (frame-parameter frame1 'minibuffer))) 548 (not (frame-parameter frame1 'minibuffer)))
549 549
550;;;autoload 550;;;###autoload
551(cl-defun frameset-restore (frameset &key filters reuse-frames force-display force-onscreen) 551(cl-defun frameset-restore (frameset &key filters reuse-frames force-display force-onscreen)
552 "Restore a FRAMESET into the current display(s). 552 "Restore a FRAMESET into the current display(s).
553 553
554FILTERS is a list of parameter filters; defaults to `frameset-filter-alist'. 554FILTERS is an alist of parameter filters; defaults to `frameset-filter-alist'.
555 555
556REUSE-FRAMES describes how to reuse existing frames while restoring a frameset: 556REUSE-FRAMES describes how to reuse existing frames while restoring a frameset:
557 t Reuse any existing frame if possible; delete leftover frames. 557 t Reuse any existing frame if possible; delete leftover frames.