From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 4 Jul 2014 07:40:08 +0000 (+0300)
Subject: src/w32.c (network_interface_info): Make sure the argument is a Lisp string.
X-Git-Tag: emacs-24.3.93~99
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f0f34bc8b91dad77474f8f8c8d9f4bda568eaace;p=emacs.git

src/w32.c (network_interface_info): Make sure the argument is a Lisp string.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index f84fe133c7e..24343faa407 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2014-07-04  Eli Zaretskii  <eliz@gnu.org>
+
+	* w32.c (network_interface_info): Make sure the argument is a
+	Lisp string.
+
 2014-07-01  Eli Zaretskii  <eliz@gnu.org>
 
 	* dispnew.c (prepare_desired_row): Accept 2 additional arguments:
diff --git a/src/w32.c b/src/w32.c
index 0892f932bc2..15e53600d95 100644
--- a/src/w32.c
+++ b/src/w32.c
@@ -8611,6 +8611,7 @@ network_interface_list (void)
 Lisp_Object
 network_interface_info (Lisp_Object ifname)
 {
+  CHECK_STRING (ifname);
   return network_interface_get_info (ifname);
 }