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)
commit88fc841203408d81942346c602bc76dd7a97fc3b (patch)
tree7ce411d2af949b4e0efb15ac084505dc3427742a /generic/tclIOSock.c
parent75a582f3570a03b8c517653637102c8baf987067 (diff)
downloadtcl-88fc841203408d81942346c602bc76dd7a97fc3b.zip
tcl-88fc841203408d81942346c602bc76dd7a97fc3b.tar.gz
tcl-88fc841203408d81942346c602bc76dd7a97fc3b.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;