You are viewing a plain text version of this content. The canonical link for it is here.
Posted to websh-cvs@tcl.apache.org by da...@apache.org on 2001/11/19 14:11:50 UTC
cvs commit: tcl-websh/src/generic context.tcl
davidw 01/11/19 05:11:50
Modified: src/generic context.tcl
Log:
Added context delete proc.
Revision Changes Path
1.3 +6 -1 tcl-websh/src/generic/context.tcl
Index: context.tcl
===================================================================
RCS file: /home/cvs/tcl-websh/src/generic/context.tcl,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- context.tcl 2001/10/25 11:04:26 1.2
+++ context.tcl 2001/11/19 13:11:50 1.3
@@ -8,7 +8,7 @@
# See the file "license.terms" for information on usage and
# redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# @(#) $Id: context.tcl,v 1.2 2001/10/25 11:04:26 davidw Exp $
+# @(#) $Id: context.tcl,v 1.3 2001/11/19 13:11:50 davidw Exp $
#
# setup config namespace
@@ -102,6 +102,11 @@
}
}
return [join $result \n]
+ }
+
+ # destroy context
+ proc delete {} {
+ namespace delete [namespace current]
}
}
}