summaryrefslogtreecommitdiffstats
path: root/library/auto.tcl
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2005-07-23 03:31:41 (GMT)
committerdgp <dgp@users.sourceforge.net>2005-07-23 03:31:41 (GMT)
commit7f920790d8f824c489075223c18017f9656bb717 (patch)
treea1759129b3bba7bc5ab14ee589b56ba907eb75bf /library/auto.tcl
parent14816591e601d46ce04cda2a9046995076aa51f5 (diff)
downloadtcl-7f920790d8f824c489075223c18017f9656bb717.zip
tcl-7f920790d8f824c489075223c18017f9656bb717.tar.gz
tcl-7f920790d8f824c489075223c18017f9656bb717.tar.bz2
correction to reversed logic
Diffstat (limited to 'library/auto.tcl')
-rw-r--r--library/auto.tcl4
1 files changed, 2 insertions, 2 deletions
diff --git a/library/auto.tcl b/library/auto.tcl
index 90f8b14..80fc2a2 100644
--- a/library/auto.tcl
+++ b/library/auto.tcl
@@ -3,7 +3,7 @@
# utility procs formerly in init.tcl dealing with auto execution
# of commands and can be auto loaded themselves.
#
-# RCS: @(#) $Id: auto.tcl,v 1.12.2.9 2005/07/22 21:59:39 dgp Exp $
+# RCS: @(#) $Id: auto.tcl,v 1.12.2.10 2005/07/23 03:31:41 dgp Exp $
#
# Copyright (c) 1991-1993 The Regents of the University of California.
# Copyright (c) 1994-1998 Sun Microsystems, Inc.
@@ -553,7 +553,7 @@ auto_mkindex_parser::command proc {name args} {
auto_mkindex_parser::hook {
if {![catch {package require tbcload}]} {
- if {[namespace which -command tbcload::bcproc] ne ""} {
+ if {[namespace which -command tbcload::bcproc] eq ""} {
auto_load tbcload::bcproc
}
load {} tbcload $auto_mkindex_parser::parser