From ae56f9fc8840d99814f8fc8986fe6445ec9a57e6 Mon Sep 17 00:00:00 2001 From: welch Date: Wed, 31 Mar 1999 22:37:17 +0000 Subject: Tests for pkg_mkIndex when input files do "namespace import". BUG 1327 --- tests/pkgMkIndex.test | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/tests/pkgMkIndex.test b/tests/pkgMkIndex.test index 3251feb..5b14989 100644 --- a/tests/pkgMkIndex.test +++ b/tests/pkgMkIndex.test @@ -8,7 +8,7 @@ # Copyright (c) 1998 by Scriptics Corporation. # All rights reserved. # -# RCS: @(#) $Id: pkgMkIndex.test,v 1.4 1998/11/12 05:54:21 welch Exp $ +# RCS: @(#) $Id: pkgMkIndex.test,v 1.5 1999/03/31 22:37:17 welch Exp $ if {[string compare test [info procs test]] == 1} then {source defs} @@ -331,6 +331,13 @@ if {[file exists $x]} { puts "Skipping pkgMkIndex-10.1 (index of DLL and script)" } +# Tolerate "namespace import" at the global scope + +test pkgMkIndex-11.1 {conflicting namespace imports} { + pkgtest::runIndex pkg import.tcl +} {0 {{fubar:1.0 {tclPkgSetup {import.tcl source ::fubar::foo}}}}} + + # # cleanup # -- cgit v0.12