summaryrefslogtreecommitdiffstats
path: root/library/reg/pkgIndex.tcl
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-06-14 07:27:05 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-06-14 07:27:05 (GMT)
commitc1c857a816045781415e0ad691c07272c6e37317 (patch)
tree972e1f583c8652eb1232f699c6ebdd97f45c2df4 /library/reg/pkgIndex.tcl
parentb032d3f79850e4e9808532d211ad49a87f6b5682 (diff)
downloadtcl-c1c857a816045781415e0ad691c07272c6e37317.zip
tcl-c1c857a816045781415e0ad691c07272c6e37317.tar.gz
tcl-c1c857a816045781415e0ad691c07272c6e37317.tar.bz2
more readable
Diffstat (limited to 'library/reg/pkgIndex.tcl')
-rwxr-xr-xlibrary/reg/pkgIndex.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/library/reg/pkgIndex.tcl b/library/reg/pkgIndex.tcl
index 35b1143..40032a5 100755
--- a/library/reg/pkgIndex.tcl
+++ b/library/reg/pkgIndex.tcl
@@ -1,5 +1,5 @@
if {![package vsatisfies [package provide Tcl] 8]} return
-if {[string compare [info sharedlibextension] .dll]} return
+if {[info sharedlibextension] != ".dll"} return
if {[info exists ::tcl_platform(debug)]} {
package ifneeded registry 1.1.5 \
[list load [file join $dir tclreg11g.dll] registry]