remove POSIX dependency

This commit is contained in:
kyoshiro 2007-02-02 23:01:41 +00:00
parent 7bf018748f
commit fdc917b045
1 changed files with 2 additions and 3 deletions

View File

@ -3,7 +3,6 @@
use strict;
#use serialize;
use IO::File;
use POSIX;
use Data::Dumper;
my $CFILE = $ENV{'HOME'} . '/.bip/bip.conf.autogen';
@ -452,9 +451,9 @@ authorityKeyIdentifier=keyid:always";
sub writeConfig {
my ($f) = @_;
my ($fh, $ts);
my ($fh, $ts, @t);
$ts = POSIX::strftime('%a, %d %b %Y %H:%M:%S %z', localtime(time));
$ts = localtime(time));
$fh = new IO::File;
$fh->open('> ' . $f) || return "Unable to open $f for writing";
print $fh "# vim:ft=bip:ts=2\n";