diff options
-rwxr-xr-x | processmail | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/processmail b/processmail index 45f5aa310..ebeb95bf7 100755 --- a/processmail +++ b/processmail @@ -717,6 +717,17 @@ sub NewProcessOnePerson ($$$$$$$$$$$) { my %substs; + # If an attachment was created, then add an URL. (Note: the 'g'lobal + # replace should work with comments with multiple attachments.) + + if ( $newcomments =~ /Created an attachment \(/ ) { + + my $showattachurlbase = + Param('urlbase') . "showattachment.cgi?attach_id="; + + $newcomments =~ s/(Created an attachment \(id=([0-9]+)\))/$1\n --> \(${showattachurlbase}$2\)/g; + } + $person .= Param('emailsuffix'); # 09/13/2000 cyeh@bluemartini.com # If a bug is changed, don't put the word "Changed" in the subject mail |