emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r105063: Document "ignored" arguments


From: Bill Wohler
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r105063: Document "ignored" arguments to keep checkdoc happy.
Date: Sat, 09 Jul 2011 13:25:54 -0700
User-agent: Bazaar (2.3.1)

------------------------------------------------------------
revno: 105063
committer: Bill Wohler <address@hidden>
branch nick: trunk
timestamp: Sat 2011-07-09 13:25:54 -0700
message:
  Document "ignored" arguments to keep checkdoc happy.
  
  * mh-speed.el (mh-speed-toggle,mh-speed-view): Ditto
  * mh-search.el (mh-flists-execute): Ditto.
  * mh-funcs.el (mh-undo-folder): Ditto.
  * mh-comp.el (mh-user-agent-compose): Ditto.
modified:
  lisp/mh-e/ChangeLog
  lisp/mh-e/mh-comp.el
  lisp/mh-e/mh-funcs.el
  lisp/mh-e/mh-search.el
  lisp/mh-e/mh-speed.el
=== modified file 'lisp/mh-e/ChangeLog'
--- a/lisp/mh-e/ChangeLog       2011-07-04 02:53:16 +0000
+++ b/lisp/mh-e/ChangeLog       2011-07-09 20:25:54 +0000
@@ -1,3 +1,18 @@
+2011-07-09  Bill Wohler  <address@hidden>
+
+       * mh-speed.el (mh-speed-toggle,mh-speed-view): Document "ignored"
+       arguments to keep checkdoc happy.
+
+       * mh-search.el (mh-flists-execute): Ditto.
+
+       * mh-funcs.el (mh-undo-folder): Ditto.
+
+       * mh-comp.el (mh-user-agent-compose): Ditto.
+
+       * mh-xface.el (mh-face-to-png, mh-uncompface)
+       (mh-picon-file-contents): Only call set-buffer-multibyte if it
+       exists, which it doesn't in XEmacs.
+
 2011-07-04  Bill Wohler  <address@hidden>
 
        * mh-e.el: Just require mh-loaddefs since loading it in an

=== modified file 'lisp/mh-e/mh-comp.el'
--- a/lisp/mh-e/mh-comp.el      2011-07-04 02:17:42 +0000
+++ b/lisp/mh-e/mh-comp.el      2011-07-09 20:25:54 +0000
@@ -213,7 +213,7 @@
 are strings.
 
 CONTINUE, SWITCH-FUNCTION, YANK-ACTION, SEND-ACTIONS, and
-RETURN-ACTION are ignored."
+RETURN-ACTION and any additional arguments are IGNORED."
   (mh-find-path)
   (let ((mh-error-if-no-draft t))
     (mh-send to "" subject)

=== modified file 'lisp/mh-e/mh-funcs.el'
--- a/lisp/mh-e/mh-funcs.el     2011-04-06 01:14:03 +0000
+++ b/lisp/mh-e/mh-funcs.el     2011-07-09 20:25:54 +0000
@@ -349,7 +349,7 @@
         (error "Error occurred during execution of %s" command)))))
 
 ;;;###mh-autoload
-(defun mh-undo-folder (&rest _ignored)
+(defun mh-undo-folder (&rest ignored)
   "Undo all refiles and deletes in the current folder.
 Arguments are IGNORED (for `revert-buffer')."
   (interactive)

=== modified file 'lisp/mh-e/mh-search.el'
--- a/lisp/mh-e/mh-search.el    2011-07-04 02:17:42 +0000
+++ b/lisp/mh-e/mh-search.el    2011-07-09 20:25:54 +0000
@@ -454,12 +454,12 @@
 
 (defvar mh-flists-search-folders)
 
-(defun mh-flists-execute (&rest args)
+(defun mh-flists-execute (&rest ignored)
   "Execute flists.
 Search for messages belonging to `mh-flists-sequence' in the
 folders specified by `mh-flists-search-folders'. If
 `mh-recursive-folders-flag' is t, then the folders are searched
-recursively. All parameters ARGS are ignored."
+recursively. All arguments are IGNORED."
   (set-buffer (get-buffer-create mh-temp-index-buffer))
   (erase-buffer)
   (unless (executable-find "sh")

=== modified file 'lisp/mh-e/mh-speed.el'
--- a/lisp/mh-e/mh-speed.el     2011-01-26 08:36:39 +0000
+++ b/lisp/mh-e/mh-speed.el     2011-07-09 20:25:54 +0000
@@ -126,9 +126,9 @@
         ;; Otherwise on to your regular programming
         (t t)))
 
-(defun mh-speed-toggle (&rest args)
+(defun mh-speed-toggle (&rest ignored)
   "Toggle the display of child folders in the speedbar.
-The optional ARGS from speedbar are ignored."
+The optional arguments from speedbar are IGNORED."
   (interactive)
   (declare (ignore args))
   (beginning-of-line)
@@ -165,9 +165,9 @@
               (mh-line-beginning-position) (1+ (line-beginning-position))
               `(mh-expanded t)))))))
 
-(defun mh-speed-view (&rest args)
+(defun mh-speed-view (&rest ignored)
   "Visits the selected folder just as if you had used 
\\<mh-folder-mode-map>\\[mh-visit-folder].
-The optional ARGS from speedbar are ignored."
+The optional arguments from speedbar are IGNORED."
   (interactive)
   (declare (ignore args))
   (let* ((folder (get-text-property (mh-line-beginning-position) 'mh-folder))


reply via email to

[Prev in Thread] Current Thread [Next in Thread]