Allow ^ and $ as regular expressions in the responsible person field.
This allows us to search for all those PRs assigned to 're' without adding the ones assigned to 'reg', or 'mi' and 'mike', etc.. Finally I hope to have PR email that only contains the PRs that were really meant for me.
This commit is contained in:
parent
d9ca234dc3
commit
289bb9611e
Notes:
svn2git
2020-12-08 03:00:23 +00:00
svn path=/www/; revision=11005
1 changed files with 2 additions and 2 deletions
|
@ -1,5 +1,5 @@
|
|||
#!/usr/bin/perl -T
|
||||
# $FreeBSD: www/en/cgi/query-pr-summary.cgi,v 1.32 2001/01/12 00:19:09 peter Exp $
|
||||
# $FreeBSD: www/en/cgi/query-pr-summary.cgi,v 1.33 2001/02/19 19:23:19 peter Exp $
|
||||
|
||||
$html_mode = 1 if $ENV{'DOCUMENT_ROOT'};
|
||||
$self_ref = $ENV{'SCRIPT_NAME'};
|
||||
|
@ -52,7 +52,7 @@ if ($html_mode) {
|
|||
|
||||
$input{"responsible"} = "summary" if $opt_R;
|
||||
if ($opt_r) {
|
||||
($input{"responsible"}) = ($opt_r =~ m/^([-_a-zA-Z0-9@.]*)$/);
|
||||
($input{"responsible"}) = ($opt_r =~ m/^(\^?[-_a-zA-Z0-9@.]*\$?)$/);
|
||||
die "Insecure args" if ($input{"responsible"} ne $opt_r)
|
||||
}
|
||||
if ($opt_s) {
|
||||
|
|
Loading…
Reference in a new issue