Validate action names

This commit is contained in:
Tom Eastep 2011-01-02 07:09:42 -08:00
parent faa541ee1f
commit b3598f3766

View File

@ -657,7 +657,7 @@ sub process_actions1() {
$action =~ s/:.*$//;
}
next unless $action;
fatal_error "Invalid Action Name ($action)" unless $action =~ /^[\w-]+$/;
if ( $targets{$action} ) {
warning_message "Duplicate Action Name ($action) Ignored" unless $targets{$action} & ACTION;