diff --git a/scripts/autoscripts.tcl b/scripts/autoscripts.tcl index 0e38208bd..6bddf555e 100644 --- a/scripts/autoscripts.tcl +++ b/scripts/autoscripts.tcl @@ -352,7 +352,9 @@ proc egg_remote {idx} { putdcc $idx "-------------------------------" foreach scriptentry $datadict { # regsub -all {<[^>]+>} [dict get $scriptentry caption rendered] "" scriptcap - putdcc $idx "* [format "%-16s %s" [dict get $scriptentry name] [dict get $scriptentry description]]" + if {![string equal -nocase [dict get $scriptentry name] "autoscripts"]} { + putdcc $idx "* [format "%-16s %s" [dict get $scriptentry name] [dict get $scriptentry description]]" + } } putdcc $idx "\n" putdcc $idx "* Type 'fetch ' to download a script"