diff --git a/tcl/main.tcl.in b/tcl/main.tcl.in index 56da38d1..e4c8a57c 100644 --- a/tcl/main.tcl.in +++ b/tcl/main.tcl.in @@ -493,10 +493,10 @@ proc module {command args} { } # mods unload is handled via UReqUn mechanism when auto enabled # (unless if implicit_requirement has been inhibited) also unloads - # are triggered by ongoing reload, purge or restore commands + # are triggered by ongoing reload, purge, restore or reset cmds } elseif {(![getConf auto_handling] || [getState\ inhibit_req_record] eq [currentState evalid]) &&\ - [aboveCommandName] ni [list purge reload restore]} { + [aboveCommandName] ni [list purge reload restore reset]} { # on unload mode, unload mods in reverse order, if loaded # prior this mod, if not user asked and not required by # other loaded mods @@ -589,11 +589,11 @@ proc module {command args} { # module. If auto handling is enabled switched-on module # is handled via UReqUn mechanism (unless if # implicit_requirement has been inhibited). Also unloads are - # triggered by ongoing reload, purge or restore commands + # triggered by ongoing reload, purge, restore or reset cmds if {(![getConf auto_handling] || [getState\ inhibit_req_record] eq [currentState evalid]) &&\ $swlomod ne {} && [aboveCommandName] ni [list purge\ - reload restore]} { + reload restore reset]} { # unload mod if it was loaded prior this mod, not user # asked and not required by another loaded module set modlist [getLoadedModulePropertyList name] diff --git a/tcl/report.tcl.in b/tcl/report.tcl.in index 6581284b..622c9207 100644 --- a/tcl/report.tcl.in +++ b/tcl/report.tcl.in @@ -264,9 +264,9 @@ proc reportMsgRecord {header {hidden 0}} { # dependency evaluations which are reported by triggering top evaluation) # if hidden flag is enabled report only if verbosity >= verbose2 } elseif {(!$hidden && ([isVerbosityLevel verbose] || ([isVerbosityLevel\ - normal] && ([ongoingCommandName restore] || [ongoingCommandName\ - source]) && $recid eq [topState msgrecordid]))) || ($hidden &&\ - [isVerbosityLevel verbose2])} { + normal] && ([ongoingCommandName restore] || [ongoingCommandName source]\ + || [ongoingCommandName reset]) && $recid eq [topState msgrecordid])))\ + || ($hidden && [isVerbosityLevel verbose2])} { report $header } }