From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 23 Dec 1993 03:42:20 +0000 (+0000)
Subject: (sc-read-string): Don't pass a history arg to read-string.
X-Git-Tag: emacs-19.34~10565
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=08ffcab37e19febb90dd296eb9ecdc2c69c6374f;p=emacs.git

(sc-read-string): Don't pass a history arg to read-string.
---

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.