/[tcldrop]/tcldrop/modules/core.tcl
ViewVC logotype

Diff of /tcldrop/modules/core.tcl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.12 by fireegl, Tue May 27 15:32:09 2003 UTC revision 1.13 by fireegl, Wed May 28 19:47:53 2003 UTC
# Line 441  proc loadmodule {module {version {}}} { Line 441  proc loadmodule {module {version {}}} {
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:
# Line 560  proc restart {{type {restart}}} { Line 560  proc restart {{type {restart}}} {
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

Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26