Use `string-to-number' instead of `string-to-int'.

diff --git a/ChangeLog b/ChangeLog
index 917646a..cde1174 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2008-02-15  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+       * WL-MK (wl-news-parse-news-subr): Use `string-to-number' instead
+       of `string-to-int'.
+
 2008-02-11  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
        * WL-MK: New backquote style.

diff --git a/WL-MK b/WL-MK
index 080e784..89d7af2 100644 (file)
--- a/WL-MK
+++ b/WL-MK
@@ -524,7 +524,7 @@
                  (version-tmp (split-string (match-string 1) "\\."))
                  version news-string end)
              (while version-tmp
-               (setq version (append version (list (string-to-int (car version-tmp)))))
+               (setq version (append version (list (string-to-number (car version-tmp)))))
                (setq version-tmp (cdr version-tmp)))
              (re-search-forward "^\\(\\* \\|\f\\)" nil t)
              (goto-char (- (match-beginning 0) 1))