You are viewing a plain text version of this content. The canonical link for it is here.
Posted to alexandria-dev@jakarta.apache.org by ru...@apache.org on 2002/02/11 17:27:45 UTC
cvs commit: jakarta-alexandria/proposal/gump nag.pl
rubys 02/02/11 08:27:45
Modified: proposal/gump nag.pl
Log:
When the output is too large, capture only the last 50 lines.
Original suggestion by Glenn Nielsen <gl...@voyager.apg.more.net>
Revision Changes Path
1.7 +9 -5 jakarta-alexandria/proposal/gump/nag.pl
Index: nag.pl
===================================================================
RCS file: /home/cvs/jakarta-alexandria/proposal/gump/nag.pl,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- nag.pl 26 Sep 2001 14:28:15 -0000 1.6
+++ nag.pl 11 Feb 2002 16:27:45 -0000 1.7
@@ -69,12 +69,16 @@
print EMAIL "----------------------------------------------------\n\n";
if ($pageData) {
- if (length($pageData)<50000) { # Apache's ezmlm limit is 100000
- print EMAIL "$pageData";
- } else {
- print EMAIL "Build results exceed maximum length.";
- print EMAIL "Please see URL above for details.";
+ if (length($pageData)>50000) { # Apache's ezmlm limit is 100000
+ print EMAIL "Build results exceed maximum length.\n";
+ print EMAIL "Please see URL above for details.\n";
+ print EMAIL "Last 50 lines of build output follows.\n\n";
+
+ @lines = split("\n",$pageData);
+ $pageData = join("\n", splice(@lines, $#lines-50));
}
+
+ print EMAIL "$pageData";
} else {
print EMAIL "Build results missing. Please see URL above for details.";
}
--
To unsubscribe, e-mail: <ma...@jakarta.apache.org>
For additional commands, e-mail: <ma...@jakarta.apache.org>