From 049cb6855643cc7ff1e28670ebf26c5c24d6bbf6 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 8 Jan 2009 04:11:09 +0000 Subject: [PATCH] (ispell-check-minver): Declare. Use string-to-number rather than string-to-int. --- lisp/textmodes/ispell.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index 23a75369b38..ffc54c88176 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -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 @@ compatibility function in case version<= is not available." (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 -- 2.39.2