From 2a1a46dc73c8ebb6cb0598bf0c6eeb0ba1a5ea80 Mon Sep 17 00:00:00 2001 From: doogie <> Date: Thu, 16 Aug 2001 05:31:12 -0800 Subject: [PATCH] [project @ 2001-08-16 06:31:12 by doogie] Rename addressmap vars to be easier to understand. --- scripts/receive.in | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/scripts/receive.in b/scripts/receive.in index 3d24a3fc..d99664ba 100755 --- a/scripts/receive.in +++ b/scripts/receive.in @@ -1,5 +1,5 @@ #!/usr/bin/perl -w -# $Id: receive.in,v 1.8 2000/10/10 23:39:12 joy Exp $ +# $Id: receive.in,v 1.9 2001/08/16 06:31:12 doogie Exp $ # usage: mail is piped directly into program #set umask in order to have group-writable incoming/* @@ -33,7 +33,7 @@ s/\@.*$//; y/A-Z/a-z/; #set up to determine command -%withnaddressmap= ('-submit', 'B', +%withbugaddressmap= ('-submit', 'B', '', 'B', '-maintonly', 'M', '-quiet', 'Q', @@ -43,7 +43,7 @@ y/A-Z/a-z/; '-close', 'D', '-submitter', 'U'); -%withoutnaddressmap= ('submit', 'B', +%withoutaddressmap= ('submit', 'B', 'bugs', 'B', 'maintonly', 'M', 'quiet', 'Q', @@ -57,11 +57,11 @@ y/A-Z/a-z/; #determine command if (s/^(\d{1,9})\b//) { $bugnumber= $1; - $map= $withnaddressmap{$_}; + $map= $withbugaddressmap{$_}; $addrrec= "$bugnumber$_"; } else { $bugnumber= ''; - $map= $withoutnaddressmap{$_}; + $map= $withoutaddressmap{$_}; $addrrec= "$_"; } -- 2.39.5