# HG changeset patch # User Glenn Morris # Date 1231387869 0 # Node ID e8584976c413ac7d77f58846d54da272e748569c # Parent 426419725966526eb10c7525326b390ff8372f54 (ispell-check-minver): Declare. Use string-to-number rather than string-to-int. diff -r 426419725966 -r e8584976c413 lisp/textmodes/ispell.el --- 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