jon 01/02/17 12:09:15
Modified: proposal/gump nag.pl
Log:
added documentation
changed path to naglist to be a variable
Revision Changes Path
1.2 +9 -1 jakarta-alexandria/proposal/gump/nag.pl
Index: nag.pl
===================================================================
RCS file: /home/cvs/jakarta-alexandria/proposal/gump/nag.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- nag.pl 2001/02/17 19:45:44 1.1
+++ nag.pl 2001/02/17 20:09:15 1.2
@@ -4,14 +4,22 @@
# Nag people and mailing lists upon particular build events,
# typically failures.
#
+# @author Sam Ruby, Jon Stevens
+#
+# naglist format:
+#
+# project email nag regex
+# jakarta-alexandria [EMAIL PROTECTED] /BUILD FAILED/
+#
($sec,$min,$hour,$mday,$mon,$year) = localtime;
$date=sprintf("%d-%2.2d-%2.2d", $year+1900, $mon+1, $mday);
$url = "http://jakarta.apache.org/builds/gump/$date";
$home = "/www/jakarta.apache.org/builds/gump/$date";
$from = "Sam Ruby <rubys\@apache.org>";
+$naglist = "/home/rubys/bin/naglist";
-open (LIST, "/home/rubys/bin/naglist");
+open (LIST, "$naglist");
foreach (<LIST>) {
next if /^#/;
($project, $mailto, $regexp) = / (\S*) \s* (\S*) \s* (\/.*\/) /x;
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]