aboutsummaryrefslogtreecommitdiffstats
path: root/CVSROOT/log_accum.pl
diff options
context:
space:
mode:
authorjoe <joe@FreeBSD.org>2001-04-19 07:00:17 +0800
committerjoe <joe@FreeBSD.org>2001-04-19 07:00:17 +0800
commitc2ff00f85e6bb251f98e2c1fcff58f036695c429 (patch)
tree0dbbaf1cbd76f1629dc6a2d737b53478b3cfe1c4 /CVSROOT/log_accum.pl
parentad51a38b554352070641756d79689e9d350d4390 (diff)
downloadfreebsd-ports-gnome-c2ff00f85e6bb251f98e2c1fcff58f036695c429.tar.gz
freebsd-ports-gnome-c2ff00f85e6bb251f98e2c1fcff58f036695c429.tar.zst
freebsd-ports-gnome-c2ff00f85e6bb251f98e2c1fcff58f036695c429.zip
Remove some unnecessary spaces, and add a commented out 'use strict'
for later use.
Diffstat (limited to 'CVSROOT/log_accum.pl')
-rwxr-xr-xCVSROOT/log_accum.pl5
1 files changed, 3 insertions, 2 deletions
diff --git a/CVSROOT/log_accum.pl b/CVSROOT/log_accum.pl
index abbca51e2283..78610150b6d6 100755
--- a/CVSROOT/log_accum.pl
+++ b/CVSROOT/log_accum.pl
@@ -22,6 +22,7 @@
require 5.003; # might work with older perl5
+###use strict;
use Sys::Hostname; # get hostname() function
############################################################
@@ -449,7 +450,7 @@ sub mail_notification {
# which branches were modified during the commit.
if ($X_BRANCH_HDR) {
my %tags = map { $_ => 1 } &read_logfile("$TAGS_FILE.$PID");
- print MAIL "$X_BRANCH_HDR ", join(",", sort keys %tags), "\n";
+ print MAIL "$X_BRANCH_HDR ", join(",", sort keys %tags), "\n";
}
print MAIL "\n";
@@ -609,7 +610,7 @@ while (<STDIN>) {
/^Approved by:$/i) {
next;
}
- push (@log_lines, $_);
+ push (@log_lines, $_);
}
}
&append_line("$TAGS_FILE.$PID", $tag);