From: Reuben Thomas Date: Sun, 4 Dec 2016 21:58:00 +0000 (+0000) Subject: Remove meaningless defconst ispell-version X-Git-Tag: emacs-26.0.90~1092 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8af9cb220d1e0b16ee7ad4b5514f8d53b152bcf3;p=emacs.git Remove meaningless defconst ispell-version * lisp/textmodes/ispell.el (ispell-version): Since ispell.el is now firmly part of Emacs, and the version hasn’t changed since 2003, and isn’t used anywhere, remove it. 3rd-party code can better use the Emacs version, or feature or function checks. (ispell-check-version): No longer report ispell.el version. --- diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index 894e2eac057..398e83e9d87 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -671,11 +671,6 @@ here just for backwards compatibility.") ;;; The following are used by ispell, and should not be changed. ;;; ********************************************************************** - - -(defconst ispell-version "ispell.el 3.6 - 7-Jan-2003") - - (defun ispell-check-version (&optional interactivep) "Ensure that `ispell-program-name' is valid and has the correct version. Returns version number if called interactively. @@ -710,13 +705,11 @@ Otherwise returns the library directory name, if that is defined." (if (string-match "\\`aspell" speller) "-v" "-vv")))) (goto-char (point-min)) (if interactivep - ;; Report version information of ispell and ispell.el + ;; Report version information of ispell (progn (end-of-line) - (setq result (concat (buffer-substring-no-properties (point-min) - (point)) - ", " - ispell-version)) + (setq result (buffer-substring-no-properties (point-min) + (point))) (message "%s" result)) ;; return LIBDIR or LIBRARYVAR (overrides LIBDIR) env. (progn