diff --git a/PCbuild/get_externals.bat b/PCbuild/get_externals.bat
index c655f6ffda3..80f6d9b50f6 100644
--- a/PCbuild/get_externals.bat
+++ b/PCbuild/get_externals.bat
@@ -55,8 +55,8 @@ for %%e in (
             bzip2-1.0.6
             nasm-2.11.06
             openssl-1.0.1j
-            tcl-8.6.1.0
-            tk-8.6.1.0
+            tcl-core-8.6.3.1
+            tk-8.6.3.1
             tix-8.4.3.4
             sqlite-3.8.3.1
             xz-5.0.5
diff --git a/PCbuild/tcltk.props b/PCbuild/tcltk.props
index abccd61171e..f5a8643559c 100644
--- a/PCbuild/tcltk.props
+++ b/PCbuild/tcltk.props
@@ -4,8 +4,8 @@
   <PropertyGroup>
     <TclMajorVersion>8</TclMajorVersion>
     <TclMinorVersion>6</TclMinorVersion>
-    <TclPatchLevel>1</TclPatchLevel>
-    <TclRevision>0</TclRevision>
+    <TclPatchLevel>3</TclPatchLevel>
+    <TclRevision>1</TclRevision>
     <TkMajorVersion>$(TclMajorVersion)</TkMajorVersion>
     <TkMinorVersion>$(TclMinorVersion)</TkMinorVersion>
     <TkPatchLevel>$(TclPatchLevel)</TkPatchLevel>
@@ -14,7 +14,7 @@
     <TixMinorVersion>4</TixMinorVersion>
     <TixPatchLevel>3</TixPatchLevel>
     <TixRevision>4</TixRevision>
-    <tclDir>$(ExternalsDir)tcl-$(TclMajorVersion).$(TclMinorVersion).$(TclPatchLevel).$(TclRevision)\</tclDir>
+    <tclDir>$(ExternalsDir)tcl-core-$(TclMajorVersion).$(TclMinorVersion).$(TclPatchLevel).$(TclRevision)\</tclDir>
     <tkDir>$(ExternalsDir)tk-$(TkMajorVersion).$(TkMinorVersion).$(TkPatchLevel).$(TkRevision)\</tkDir>
     <tixDir>$(ExternalsDir)tix-$(TixMajorVersion).$(TixMinorVersion).$(TixPatchLevel).$(TixRevision)\</tixDir>
     <tcltkDir>$(ExternalsDir)tcltk\</tcltkDir>