441 |
puterrlog "$::errorInfo" |
puterrlog "$::errorInfo" |
442 |
} else { |
} else { |
443 |
variable Modules |
variable Modules |
444 |
if {[info exists "::tcldrop::${module}::version"]} { set modver $"::tcldrop::${module}::version" } else { set modver 0.0 } |
if {[info exists "::tcldrop::${module}::version"]} { set modver [set "::tcldrop::${module}::version"] } else { set modver 0.0 } |
445 |
set Modules($module) $modver |
set Modules($module) $modver |
446 |
# Import the commands... |
# Import the commands... |
447 |
# This imports them into the tcldrop namespace: |
# This imports them into the tcldrop namespace: |
560 |
# Load the required modules (the order here is important): |
# Load the required modules (the order here is important): |
561 |
loadmodule users |
loadmodule users |
562 |
loadmodule idx |
loadmodule idx |
563 |
|
package require ident |
564 |
loadmodule dcc |
loadmodule dcc |
565 |
# Rehash, (re)loads the config file (which in turn should load the optional modules): |
# Rehash, (re)loads the config file (which in turn should load the optional modules): |
566 |
rehash $type |
rehash $type |