Mercurial > emacs
comparison lisp/mail/supercite.el @ 102650:316f8efbaeae
Leo <sdl.web at gmail.com> (tiny change)
(sc-version): Fix typo in interactive spec.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Thu, 19 Mar 2009 06:12:58 +0000 |
| parents | 47faa6398829 |
| children | 7040f7fa8fef |
comparison
equal
deleted
inserted
replaced
| 102649:6e3d4a3b0b10 | 102650:316f8efbaeae |
|---|---|
| 1970 | 1970 |
| 1971 (defun sc-version (message) | 1971 (defun sc-version (message) |
| 1972 "Echo the current version of Supercite in the minibuffer. | 1972 "Echo the current version of Supercite in the minibuffer. |
| 1973 If MESSAGE is non-nil (interactively, with no prefix argument), | 1973 If MESSAGE is non-nil (interactively, with no prefix argument), |
| 1974 inserts the version string in the current buffer instead." | 1974 inserts the version string in the current buffer instead." |
| 1975 (interactive (not current-prefix-arg)) | 1975 (interactive (list (not current-prefix-arg))) |
| 1976 (let ((verstr (format "Using Supercite.el %s" emacs-version))) | 1976 (let ((verstr (format "Using Supercite.el %s" emacs-version))) |
| 1977 (if message | 1977 (if message |
| 1978 (message verstr) | 1978 (message verstr) |
| 1979 (insert "`sc-version' says: " verstr)))) | 1979 (insert "`sc-version' says: " verstr)))) |
| 1980 | 1980 |