diff options
-rwxr-xr-x | dh | 7 | ||||
-rw-r--r-- | doc/PROGRAMMING | 3 |
2 files changed, 2 insertions, 8 deletions
@@ -346,12 +346,7 @@ sub remove_command_options { # Remove only specified options if (my $opts = $command_opts{$command}) { foreach my $opt (@_) { - if (ref($opt) eq "Regexp") { - $opts = [ grep ! /$opt/, @$opts ]; - } - else { - $opts = [ grep { $_ ne $opt } @$opts ]; - } + $opts = [ grep { $_ ne $opt } @$opts ]; } $command_opts{$command} = $opts; } diff --git a/doc/PROGRAMMING b/doc/PROGRAMMING index 211e57ee..5f236ebd 100644 --- a/doc/PROGRAMMING +++ b/doc/PROGRAMMING @@ -281,8 +281,7 @@ remove_command_options($command) remove_command_options($command, $opt1, $opt2, ...) Remove $opt1, $opt2 etc. from the list of additional options which - dh passes when running the specified $command. $optX might be a string - or a regular expresion. + dh passes when running the specified $command. Buildsystem Classes: ------------------- |