diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-12-04 09:56:08 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-12-04 09:56:08 (GMT) |
| commit | 86cfccca916781bdd91504a7d7b03d78cb6acfa8 (patch) | |
| tree | e5bb8acc1ef00b24cec90992813d921bfc43c750 /tests/pkgMkIndex.test | |
| parent | efb126543f991101ab3703d8f659d64674a54cd2 (diff) | |
| parent | 1704d23d60d9f21edb117206e36ce0cf911ef376 (diff) | |
| download | tcl-86cfccca916781bdd91504a7d7b03d78cb6acfa8.zip tcl-86cfccca916781bdd91504a7d7b03d78cb6acfa8.tar.gz tcl-86cfccca916781bdd91504a7d7b03d78cb6acfa8.tar.bz2 | |
TIP 590: Recommend lowercase Package Names
Diffstat (limited to 'tests/pkgMkIndex.test')
| -rw-r--r-- | tests/pkgMkIndex.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/pkgMkIndex.test b/tests/pkgMkIndex.test index 1205d6a..df49c32 100644 --- a/tests/pkgMkIndex.test +++ b/tests/pkgMkIndex.test @@ -559,8 +559,8 @@ testConstraint $dll [file exists $x] if {[testConstraint $dll]} { makeFile { -# This package provides Pkga, which is also provided by a DLL. -package provide Pkga 1.0 +# This package provides pkga, which is also provided by a DLL. +package provide pkga 1.0 proc pkga_neq { x } { return [expr {! [pkgq_eq $x]}] } @@ -576,7 +576,7 @@ test pkgMkIndex-10.1 {package in DLL and script} [list exec $dll] { set cmd [list pkg_mkIndex -lazy $fullPkgPath [file tail $x] pkga.tcl] exec [interpreter] << $cmd pkgtest::runCreatedIndex {0 {}} -lazy $fullPkgPath pkga[info sharedlibextension] pkga.tcl -} "0 {{Pkga:1.0 {tclPkgSetup {pkga[info sharedlibextension] load {pkga_eq pkga_quote}} {pkga.tcl source pkga_neq}}}}" +} "0 {{pkga:1.0 {tclPkgSetup {pkga[info sharedlibextension] load {pkga_eq pkga_quote}} {pkga.tcl source pkga_neq}}}}" test pkgMkIndex-10.2 {package in DLL hidden by -load} [list exec $dll] { # Do all [load]ing of shared libraries in another process, so we can # delete the file and not get stuck because we're holding a reference to |