diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-12-23 03:42:20 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-12-23 03:42:20 +0000 |
| commit | 08ffcab37e19febb90dd296eb9ecdc2c69c6374f (patch) | |
| tree | 72f033bbe6af8a39e4904f431b007fbe1eb72828 /lisp/mail/supercite.el | |
| parent | f5a131d8fdc907e3b49b37123deba88fcaf2a590 (diff) | |
| download | emacs-08ffcab37e19febb90dd296eb9ecdc2c69c6374f.tar.gz emacs-08ffcab37e19febb90dd296eb9ecdc2c69c6374f.tar.bz2 emacs-08ffcab37e19febb90dd296eb9ecdc2c69c6374f.zip | |
(sc-read-string): Don't pass a history arg to read-string.
Diffstat (limited to 'lisp/mail/supercite.el')
| -rw-r--r-- | lisp/mail/supercite.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/mail/supercite.el b/lisp/mail/supercite.el index d1c145b4ae3..d6cdd12a2ea 100644 --- a/lisp/mail/supercite.el +++ b/lisp/mail/supercite.el @@ -499,8 +499,9 @@ In version 18, the HISTORY argument is ignored." "Compatibility between Emacs 18 and 19 `read-string'. In version 18, the HISTORY argument is ignored." (if (memq 'v19 sc-emacs-features) - (funcall 'read-string prompt initial-contents history) - (funcall 'read-string prompt initial-contents))) + ;; maybe future versions will take a `history' argument: + (read-string prompt initial-contents) + (read-string prompt initial-contents))) (defun sc-submatch (matchnum &optional string) "Returns `match-beginning' and `match-end' sub-expression for MATCHNUM. |