diff options
Diffstat (limited to 'library')
-rw-r--r-- | library/init.tcl | 4 | ||||
-rwxr-xr-x | library/reg/pkgIndex.tcl | 4 | ||||
-rwxr-xr-x | library/reg1.0/pkgIndex.tcl | 4 | ||||
-rw-r--r-- | library/tcltest/tcltest.tcl | 6 | ||||
-rw-r--r-- | library/tcltest1.0/tcltest.tcl | 6 |
5 files changed, 12 insertions, 12 deletions
diff --git a/library/init.tcl b/library/init.tcl index 0b3d546..941c5d6 100644 --- a/library/init.tcl +++ b/library/init.tcl @@ -3,7 +3,7 @@ # Default system startup file for Tcl-based applications. Defines # "unknown" procedure and auto-load facilities. # -# RCS: @(#) $Id: init.tcl,v 1.39 2000/02/01 19:26:08 ericm Exp $ +# RCS: @(#) $Id: init.tcl,v 1.40 2000/05/03 00:15:06 hobbs Exp $ # # Copyright (c) 1991-1993 The Regents of the University of California. # Copyright (c) 1994-1996 Sun Microsystems, Inc. @@ -16,7 +16,7 @@ if {[info commands package] == ""} { error "version mismatch: library\nscripts expect Tcl version 7.5b1 or later but the loaded version is\nonly [info patchlevel]" } -package require -exact Tcl 8.3 +package require -exact Tcl 8.4 # Compute the auto path to use in this interpreter. # The values on the path come from several locations: diff --git a/library/reg/pkgIndex.tcl b/library/reg/pkgIndex.tcl index d3e39dd..b32c71b 100755 --- a/library/reg/pkgIndex.tcl +++ b/library/reg/pkgIndex.tcl @@ -1,7 +1,7 @@ if {[info exists tcl_platform(debug)]} { package ifneeded registry 1.0 \ - [list load [file join $dir tclreg83d.dll] registry] + [list load [file join $dir tclreg84d.dll] registry] } else { package ifneeded registry 1.0 \ - [list load [file join $dir tclreg83.dll] registry] + [list load [file join $dir tclreg84.dll] registry] } diff --git a/library/reg1.0/pkgIndex.tcl b/library/reg1.0/pkgIndex.tcl index d3e39dd..b32c71b 100755 --- a/library/reg1.0/pkgIndex.tcl +++ b/library/reg1.0/pkgIndex.tcl @@ -1,7 +1,7 @@ if {[info exists tcl_platform(debug)]} { package ifneeded registry 1.0 \ - [list load [file join $dir tclreg83d.dll] registry] + [list load [file join $dir tclreg84d.dll] registry] } else { package ifneeded registry 1.0 \ - [list load [file join $dir tclreg83.dll] registry] + [list load [file join $dir tclreg84.dll] registry] } diff --git a/library/tcltest/tcltest.tcl b/library/tcltest/tcltest.tcl index 5898cf6..8a56371 100644 --- a/library/tcltest/tcltest.tcl +++ b/library/tcltest/tcltest.tcl @@ -12,7 +12,7 @@ # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. # -# RCS: @(#) $Id: tcltest.tcl,v 1.24 2000/04/11 01:04:19 welch Exp $ +# RCS: @(#) $Id: tcltest.tcl,v 1.25 2000/05/03 00:15:07 hobbs Exp $ package provide tcltest 1.0 @@ -267,10 +267,10 @@ namespace eval tcltest { # Tcl version numbers if {![info exists version]} { - variable version 8.3 + variable version 8.4 } if {![info exists patchLevel]} { - variable patchLevel 8.3.0 + variable patchLevel 8.4a1 } } diff --git a/library/tcltest1.0/tcltest.tcl b/library/tcltest1.0/tcltest.tcl index 5898cf6..8a56371 100644 --- a/library/tcltest1.0/tcltest.tcl +++ b/library/tcltest1.0/tcltest.tcl @@ -12,7 +12,7 @@ # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. # -# RCS: @(#) $Id: tcltest.tcl,v 1.24 2000/04/11 01:04:19 welch Exp $ +# RCS: @(#) $Id: tcltest.tcl,v 1.25 2000/05/03 00:15:07 hobbs Exp $ package provide tcltest 1.0 @@ -267,10 +267,10 @@ namespace eval tcltest { # Tcl version numbers if {![info exists version]} { - variable version 8.3 + variable version 8.4 } if {![info exists patchLevel]} { - variable patchLevel 8.3.0 + variable patchLevel 8.4a1 } } |