diff options
author | peter <peter@FreeBSD.org> | 1995-11-02 18:03:09 +0800 |
---|---|---|
committer | peter <peter@FreeBSD.org> | 1995-11-02 18:03:09 +0800 |
commit | 6d4a97c0811ae70a6b28ff72ac9ddbe9b1fe8f80 (patch) | |
tree | ec891ccb27ec60d6bbef3111d400e612f508b59e /CVSROOT | |
parent | 9112cee9bd61c6c2c0416333718cbe6f7a8a9ad7 (diff) | |
download | freebsd-ports-gnome-6d4a97c0811ae70a6b28ff72ac9ddbe9b1fe8f80.tar.gz freebsd-ports-gnome-6d4a97c0811ae70a6b28ff72ac9ddbe9b1fe8f80.tar.zst freebsd-ports-gnome-6d4a97c0811ae70a6b28ff72ac9ddbe9b1fe8f80.zip |
Bang! Shoot me! I'll RTFM next time, I promise. I thought chop only took
off newlines. :-O
Diffstat (limited to 'CVSROOT')
-rwxr-xr-x | CVSROOT/log_accum.pl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/CVSROOT/log_accum.pl b/CVSROOT/log_accum.pl index 7cd7b5618839..af4bcdb2ba9d 100755 --- a/CVSROOT/log_accum.pl +++ b/CVSROOT/log_accum.pl @@ -1,6 +1,6 @@ #!/usr/bin/perl -w # -# $Id: log_accum.pl,v 1.11 1995/11/02 07:33:22 peter Exp $ +# $Id: log_accum.pl,v 1.12 1995/11/02 09:30:21 peter Exp $ # # Perl filter to handle the log messages from the checkin of files in # a directory. This script will group the lists of files by log @@ -280,7 +280,6 @@ sub mail_notification { $id = getpgrp(); $state = $STATE_NONE; $login = $ENV{'USER'} || getlogin || (getpwuid($<))[0] || sprintf("uid#%d",$<); -chop($login); @files = split(' ', $ARGV[0]); @path = split('/', $files[0]); $repository = @path[0]; |