forked from lix-project/lix
* Remove the dependency on `date', use strftime instead.
This commit is contained in:
parent
339e6f0e1d
commit
981eff065b
|
@ -2,7 +2,7 @@
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use readmanifest;
|
use readmanifest;
|
||||||
use POSIX qw(tmpnam);
|
use POSIX qw(tmpnam strftime);
|
||||||
|
|
||||||
my $manifestDir = "@localstatedir@/nix/manifests";
|
my $manifestDir = "@localstatedir@/nix/manifests";
|
||||||
my $logFile = "@localstatedir@/log/nix/downloads";
|
my $logFile = "@localstatedir@/log/nix/downloads";
|
||||||
|
@ -27,8 +27,7 @@ END { unlink $tmpNar; unlink $tmpNar2; rmdir $tmpDir; }
|
||||||
die unless scalar @ARGV == 1;
|
die unless scalar @ARGV == 1;
|
||||||
my $targetPath = $ARGV[0];
|
my $targetPath = $ARGV[0];
|
||||||
|
|
||||||
my $date = `date` or die;
|
my $date = strftime ("%F %H:%M:%S UTC", gmtime (time));
|
||||||
chomp $date;
|
|
||||||
print LOGFILE "$$ get $targetPath $date\n";
|
print LOGFILE "$$ get $targetPath $date\n";
|
||||||
|
|
||||||
print "\n*** Trying to download/patch `$targetPath'\n";
|
print "\n*** Trying to download/patch `$targetPath'\n";
|
||||||
|
|
Loading…
Reference in a new issue