Use string-to-number.

diff --git a/misc/ChangeLog b/misc/ChangeLog
index 1f589db19e73978d35e133958ceae0159bfb06d2..c400af0bc08f667396b6ac99bc11b665fb188c85 100644 (file)
--- a/misc/ChangeLog
+++ b/misc/ChangeLog
@@ -1,3 +1,9 @@
+2001-08-18  Karl Eichwalder  <ke@suse.de>
+
+       * po-mode.el (po-ensure-source-references): Use 'string-to-number'
+       instead of 'string-to-int'.
+       (po-msgfmt-version-check): Likewise.
+
 2001-08-11  Karl Eichwalder  <ke@suse.de>
 
        * po-mode.el (po-edit-string): Set indent-line-function to

diff --git a/misc/po-mode.el b/misc/po-mode.el
index 2580d0ed6c5d046c5fac155c4ef80e21f9d6d4de..9d970a3b9001bb18e9c5ef2c05f516075feb04f0 100644 (file)
--- a/misc/po-mode.el
+++ b/misc/po-mode.el
@@ -2214,7 +2214,7 @@ the file without moving its cursor."
                  (setq po-reference-alist
                        (cons (list (concat current ":" line)
                                    current
-                                   (string-to-int line))
+                                   (string-to-number line))
                              po-reference-alist)))))))
     (setq po-reference-alist (nreverse po-reference-alist)
          po-reference-cursor po-reference-alist
@@ -2875,11 +2875,11 @@ Leave point after marked string."
                  (looking-at ".* \\([0-9]+\\)\\.\\([0-9]+\\)\\.\\([0-9]+\\)$")))
 
       ;; Make sure the version is recent enough.
-      (>= (string-to-int
+      (>= (string-to-number
           (format "%d%03d%03d"
-                  (string-to-int (match-string 1))
-                  (string-to-int (match-string 2))
-                  (string-to-int (or (match-string 3) "0"))))
+                  (string-to-number (match-string 1))
+                  (string-to-number (match-string 2))
+                  (string-to-number (or (match-string 3) "0"))))
          010036)
 
       ;; Remember the outcome.