From 7ca46ac7e326789367023dd705c0101ea8ed7732 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 19 Mar 2009 06:19:24 +0000 Subject: (sc-version): Doc fix. --- lisp/mail/supercite.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'lisp') diff --git a/lisp/mail/supercite.el b/lisp/mail/supercite.el index fc0f591c7e1..0f2ccedadc0 100644 --- a/lisp/mail/supercite.el +++ b/lisp/mail/supercite.el @@ -1968,10 +1968,12 @@ cited." (insert (sc-mail-field "sc-citation")) (error "Line is already cited")))) +;; The argument logic here is crazy. (defun sc-version (message) - "Echo the current version of Supercite in the minibuffer. + "Return the current Supercite version. If MESSAGE is non-nil (interactively, with no prefix argument), -inserts the version string in the current buffer instead." +echoes the version in the minibuffer. Otherwise, inserts the +version at point." (interactive (list (not current-prefix-arg))) (let ((verstr (format "Using Supercite.el %s" emacs-version))) (if message -- cgit v1.2.1