diff lisp/url/url-http.el @ 62400:e30c08177a3b

Replace `string-to-int' by `string-to-number'.

--- a/lisp/url/url-http.el	Mon May 16 08:36:21 2005 +0000
+++ b/lisp/url/url-http.el	Mon May 16 10:07:31 2005 +0000
@@ -827,10 +827,10 @@
 						 'text-cursor
 					       'cursor)
 				       'invisible t))
-	    (setq url-http-chunked-length (string-to-int (buffer-substring
-							  (match-beginning 1)
-							  (match-end 1))
-							 16)
+	    (setq url-http-chunked-length (string-to-number (buffer-substring
+                                                             (match-beginning 1)
+                                                             (match-end 1))
+                                                            16)
 		  url-http-chunked-counter (1+ url-http-chunked-counter)
 		  url-http-chunked-start (set-marker
 					  (or url-http-chunked-start
@@ -904,7 +904,7 @@
 		    url-http-content-type (mail-fetch-field "content-type"))
 	      (if (mail-fetch-field "content-length")
 		  (setq url-http-content-length
-			(string-to-int (mail-fetch-field "content-length"))))
+			(string-to-number (mail-fetch-field "content-length"))))
 	      (widen)))
 	  (if url-http-transfer-encoding
 	      (setq url-http-transfer-encoding