Mercurial > emacs

changeset 100969:e8584976c413

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ispell-check-minver): Declare. Use string-to-number rather than string-to-int.
author Glenn Morris <rgm@gnu.org>
date Thu, 08 Jan 2009 04:11:09 +0000
parents 426419725966
children 91bd7fa2c2e8
files lisp/textmodes/ispell.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/ispell.el	Thu Jan 08 04:10:35 2009 +0000
+++ b/lisp/textmodes/ispell.el	Thu Jan 08 04:11:09 2009 +0000
@@ -198,6 +198,8 @@
 
 ;;; Compatibility code for xemacs and (not too) older emacsen:
 
+(declare-function ispell-check-minver "ispell" (v1 v2))
+
 (if (fboundp 'version<=)
     (defalias 'ispell-check-minver 'version<=)
   (defun ispell-check-minver (minver version)
@@ -214,10 +216,10 @@
 	(let (ver mver)
 	  (if (string-match "[0-9]+" version start-ver)
 	      (setq start-ver (match-end 0)
-		    ver (string-to-int (substring version (match-beginning 0) (match-end 0)))))
+		    ver (string-to-number (substring version (match-beginning 0) (match-end 0)))))
 	  (if (string-match "[0-9]+" minver start-mver)
 	      (setq start-mver (match-end 0)
-		    mver (string-to-int (substring minver (match-beginning 0) (match-end 0)))))
+		    mver (string-to-number (substring minver (match-beginning 0) (match-end 0)))))
 
 	  (if (or ver mver)
 	      (progn