diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-06-29 11:39:00 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-06-29 11:39:00 (GMT) |
commit | 88fc841203408d81942346c602bc76dd7a97fc3b (patch) | |
tree | 7ce411d2af949b4e0efb15ac084505dc3427742a /generic/tclIOSock.c | |
parent | 75a582f3570a03b8c517653637102c8baf987067 (diff) | |
download | tcl-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.c | 2 |
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; |