mirror of
git://git.sv.gnu.org/coreutils.git
synced 2026-04-13 23:36:10 +02:00
maint: update-copyright: fix just-introduced bug
* build-aux/update-copyright: ... and revert-for-now the change that made this script invoke localtime only once.
This commit is contained in:
@@ -1,7 +1,7 @@
|
||||
#!/usr/bin/perl -0777 -pi
|
||||
# Update an FSF copyright year list to include the current year.
|
||||
|
||||
my $VERSION = '2009-07-29.08:18'; # UTC
|
||||
my $VERSION = '2009-07-29.08:43'; # UTC
|
||||
|
||||
# Copyright (C) 2009 Free Software Foundation
|
||||
#
|
||||
@@ -23,14 +23,10 @@ my $VERSION = '2009-07-29.08:18'; # UTC
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
my $this_year;
|
||||
my ($sec, $min, $hour, $mday, $month, $year) = localtime (time());
|
||||
my $this_year = $year + 1900;
|
||||
my $holder = 'Free Software Foundation';
|
||||
|
||||
BEGIN {
|
||||
my ($sec, $min, $hour, $mday, $month, $year) = localtime (time());
|
||||
$this_year = $year + 1900;
|
||||
}
|
||||
|
||||
if (/([- ])((?:\d\d)?\d\d)(\s+$holder)/s)
|
||||
{
|
||||
my ($sep, $last_c_year, $rest) = ($1, $2, $3);
|
||||
|
||||
Reference in New Issue
Block a user