HCoop
/
hcoop
/
scripts.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
2a789da
)
Escape @ in mail address for quotacheck
author
clinton_admin
<clinton_admin@navajos.hcoop.net>
Thu, 20 Dec 2012 08:26:26 +0000
(
03:26
-0500)
committer
clinton_admin
<clinton_admin@navajos.hcoop.net>
Thu, 20 Dec 2012 08:26:26 +0000
(
03:26
-0500)
* This caused an error on newer perl
quotacheck
patch
|
blob
|
blame
|
history
diff --git
a/quotacheck
b/quotacheck
index
2d638d1
..
70306a9
100755
(executable)
--- a/
quotacheck
+++ b/
quotacheck
@@
-237,7
+237,7
@@
sub email_notify {
$_ =~ s/\$CRIT{(\w+)}/$warn{$user}{$1} ? " (APPROACHING QUOTA)" : ""/mge;
}
#print join('', @msg);
- open(MAIL, "| mail -s 'Approaching quota limit at HCoop' -a 'From: admins\@hcoop.net' -b 'admins@hcoop.net' '$user\@hcoop.net'");
+ open(MAIL, "| mail -s 'Approaching quota limit at HCoop' -a 'From: admins\@hcoop.net' -b 'admins
\
@hcoop.net' '$user\@hcoop.net'");
{ no warnings; print main::MAIL join('', @msg); }
close MAIL;
}