set scripts {
  "scripts/alltools.tcl"
  "scripts/action.fix.tcl"
  "scripts/compat.tcl"
}

foreach script $scripts {
  if {[catch {source $script} error]} {
    putlog "Error occoured when loading $script: $error"
  }
}