[Emacs-diffs] trunk r113678: lisp/frameset.el: Fix typos and autoload cookies.

[Juanma Barranquero]

------------------------------------------------------------
revno: 113678
revision-id: address@hidden
parent: address@hidden
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Sun 2013-08-04 02:58:32 +0200
message:
  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.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/frameset.el               frameset.el-20130802043218-tfwraxv1c2zlibpw-1

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-08-04 00:31:33 +0000
+++ b/lisp/ChangeLog    2013-08-04 00:58:32 +0000
@@ -1,5 +1,9 @@
 2013-08-04  Juanma Barranquero  <address@hidden>
 
+       * frameset.el (frameset-p, frameset-save): Fix autoload cookies.
+       (frameset-filter-minibuffer): Doc fix.
+       (frameset-restore): Fix autoload cookie.  Fix typo in docstring.
+
        * desktop.el (desktop-clear): Only delete frames when called
        interactively and desktop-restore-frames is non-nil.  Doc fix.
        (desktop-read): Set desktop-saved-frameset to nil.

=== modified file 'lisp/frameset.el'
--- a/lisp/frameset.el  2013-08-03 13:33:22 +0000
+++ b/lisp/frameset.el  2013-08-04 00:58:32 +0000
@@ -71,7 +71,7 @@
 This is a deep copy done with `copy-tree'."
   (copy-tree frameset t))
 
-;;;autoload
+;;;###autoload
 (defun frameset-p (frameset)
   "If FRAMESET is a frameset, return its :version.
 Else return nil."
@@ -179,7 +179,7 @@
       (not (string-match-p "^unspecified-[fb]g$" (cdr current)))))
 
 (defun frameset-filter-minibuffer (current _filtered _parameters saving)
-  "Convert (minibuffer . #<window>) parameter to (minibuffer . t)."
+  "When saving, convert (minibuffer . #<window>) parameter to (minibuffer . 
t)."
   (or (not saving)
       (if (windowp (cdr current))
          '(minibuffer . t)
@@ -302,7 +302,7 @@
                               'frameset--mini
                               (cons nil id)))))))
 
-;;;autoload
+;;;###autoload
 (cl-defun frameset-save (frame-list &key filters predicate properties)
   "Return the frameset of FRAME-LIST, a list of frames.
 If nil, FRAME-LIST defaults to all live frames.
@@ -547,11 +547,11 @@
 to delete a frame whose minibuffer window is used by another frame."
   (not (frame-parameter frame1 'minibuffer)))
 
-;;;autoload
+;;;###autoload
 (cl-defun frameset-restore (frameset &key filters reuse-frames force-display 
force-onscreen)
   "Restore a FRAMESET into the current display(s).
 
-FILTERS is a list of parameter filters; defaults to `frameset-filter-alist'.
+FILTERS is an alist of parameter filters; defaults to `frameset-filter-alist'.
 
 REUSE-FRAMES describes how to reuse existing frames while restoring a frameset:
   t       Reuse any existing frame if possible; delete leftover frames.