Diff
Not logged in

Differences From Artifact [a9e801c84e]:

To Artifact [0ed7e11999]:


739
740
741
742
743
744

745
746
747
748
749
750
751





752
753
754
755
756
739
740
741
742
743

744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761





-
+







+
+
+
+
+





      #       Authenticode signature. 
      # 
      tcl load -findflags +TrustedOnly -loadflags +SetDllDirectory 
    } 
 
    if {$autoHook} then { 
    if {$autoHook && ![isPackageUnknownHandlerHooked]} then { 
      # 
      # NOTE: Install our [package unknown] handler and save the original 
      #       one for our use as well. 
      # 
      hookPackageUnknownHandler 
    } 
  } 
 
  proc isPackageUnknownHandlerHooked {} { 
    return [info exists [appendArgs \ 
        [getLookupVarNamePrefix] saved_package_unknown]] 
  } 
 
  proc hookPackageUnknownHandler {} { 
    set varName [appendArgs [getLookupVarNamePrefix] saved_package_unknown] 
 
    if {[info exists $varName]} then {