summaryrefslogtreecommitdiffstats
path: root/generic/tclIOSock.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2016-06-29 11:39:00 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2016-06-29 11:39:00 (GMT)
commitb2522c9c24b283a616ac38c4c987827c4fa86167 (patch)
tree7ce411d2af949b4e0efb15ac084505dc3427742a /generic/tclIOSock.c
parent23a0290873b671c61ba3bc112ffc158fb859667a (diff)
downloadtcl-b2522c9c24b283a616ac38c4c987827c4fa86167.zip
tcl-b2522c9c24b283a616ac38c4c987827c4fa86167.tar.gz
tcl-b2522c9c24b283a616ac38c4c987827c4fa86167.tar.bz2
Tcl_SetVar -> Tcl_SetVar2 and comparable replacements, eliminating functions which are deprecated.
Diffstat (limited to 'generic/tclIOSock.c')
-rw-r--r--generic/tclIOSock.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclIOSock.c b/generic/tclIOSock.c
index c5b7d28..f61073b 100644
--- a/generic/tclIOSock.c
+++ b/generic/tclIOSock.c
@@ -197,7 +197,7 @@ TclCreateSocketAddress(
*/
if (interp != NULL) {
- family = Tcl_GetVar(interp, "::tcl::unsupported::socketAF", 0);
+ family = Tcl_GetVar2(interp, "::tcl::unsupported::socketAF", NULL, 0);
if (family != NULL) {
if (strcmp(family, "inet") == 0) {
hints.ai_family = AF_INET;