summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2004-07-29 15:55:03 (GMT)
committerdgp <dgp@users.sourceforge.net>2004-07-29 15:55:03 (GMT)
commitea89b5916fbc7de04f12434ab9146b0d7caa8ce5 (patch)
treec760411a491dca24e47679e18658e76a29a9b4cc
parent04ed8b5460eeb335eba5d6c092bd8d5420664bed (diff)
downloadtcl-ea89b5916fbc7de04f12434ab9146b0d7caa8ce5.zip
tcl-ea89b5916fbc7de04f12434ab9146b0d7caa8ce5.tar.gz
tcl-ea89b5916fbc7de04f12434ab9146b0d7caa8ce5.tar.bz2
* library/package.tcl: [::pkg::create] is now an alias. Test
safe-2.1 will now fail until Bug 999612 is corrected.
-rw-r--r--ChangeLog5
-rw-r--r--library/package.tcl11
2 files changed, 7 insertions, 9 deletions
diff --git a/ChangeLog b/ChangeLog
index 3a6f47f..f0a183a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2004-07-29 Don Porter <dgp@users.sourceforge.net>
+
+ * library/package.tcl: [::pkg::create] is now an alias. Test
+ safe-2.1 will now fail until Bug 999612 is corrected.
+
2004-07-28 Don Porter <dgp@users.sourceforge.net>
* library/package.tcl: Moved private command
diff --git a/library/package.tcl b/library/package.tcl
index a5b1407..5d478c9 100644
--- a/library/package.tcl
+++ b/library/package.tcl
@@ -3,7 +3,7 @@
# utility procs formerly in init.tcl which can be loaded on demand
# for package management.
#
-# RCS: @(#) $Id: package.tcl,v 1.29 2004/07/28 18:00:10 dgp Exp $
+# RCS: @(#) $Id: package.tcl,v 1.30 2004/07/29 15:55:04 dgp Exp $
#
# Copyright (c) 1991-1993 The Regents of the University of California.
# Copyright (c) 1994-1998 Sun Microsystems, Inc.
@@ -753,11 +753,4 @@ proc ::tcl::Pkg::Create {args} {
return $cmdline
}
-# Change this to
-# interp alias {} ::pkg::create {} ::tcl::Pkg::Create
-# as soon as safe-2.1 accepts it.
-namespace eval pkg {
- proc create args {
- uplevel 1 ::tcl::Pkg::Create $args
- }
-}
+interp alias {} ::pkg::create {} ::tcl::Pkg::Create