From: Dmitry Antipov <dmantipov@yandex.ru>
Date: Fri, 25 Jan 2013 15:48:35 +0000 (+0400)
Subject: * net/socks.el (socks-nslookup-host): Use string-to-number.
X-Git-Tag: emacs-24.3.90~173^2~7^2~217
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1314a64c2626e710f2f3271729791882f5b475eb;p=emacs.git

* net/socks.el (socks-nslookup-host): Use string-to-number.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7c600ca7e6f..8e94ec32147 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2013-01-25  Dmitry Antipov  <dmantipov@yandex.ru>
+
+	* net/socks.el (socks-nslookup-host): Use string-to-number.
+
 2013-01-25  Michael Albinus  <michael.albinus@gmx.de>
 
 	* autorevert.el (auto-revert-remote-files)
diff --git a/lisp/net/socks.el b/lisp/net/socks.el
index 75b0ebe55ff..415397c4171 100644
--- a/lisp/net/socks.el
+++ b/lisp/net/socks.el
@@ -648,7 +648,7 @@ version.")
 	      (progn
 		(setq res (buffer-substring (match-beginning 2)
 					    (match-end 2))
-		      res (mapcar 'string-to-int (split-string res "\\.")))))
+		      res (mapcar 'string-to-number (split-string res "\\.")))))
 	  (kill-buffer (current-buffer)))
 	res)
     host))