remove unnecessary variable
parent
f3207cddc1
commit
4cf70291bc
|
@ -393,16 +393,13 @@ sub rcs_getctime ($) {
|
||||||
eval q{use XML::Simple};
|
eval q{use XML::Simple};
|
||||||
local $/=undef;
|
local $/=undef;
|
||||||
|
|
||||||
# Sigh... doing things the hard way again
|
my $filer=substr($file, length($config{srcdir}));
|
||||||
my $repodir=$config{srcdir};
|
|
||||||
|
|
||||||
my $filer=substr($file, length($repodir));
|
|
||||||
$filer =~ s:^[/]+::;
|
$filer =~ s:^[/]+::;
|
||||||
|
|
||||||
my $child = open(LOG, "-|");
|
my $child = open(LOG, "-|");
|
||||||
if (! $child) {
|
if (! $child) {
|
||||||
exec("darcs", "changes", "--xml", "--reverse",
|
exec("darcs", "changes", "--xml", "--reverse",
|
||||||
"--repodir", "$repodir", "$filer")
|
"--repodir", $config{srcdir}, $filer)
|
||||||
|| error("'darcs changes $filer' failed to run");
|
|| error("'darcs changes $filer' failed to run");
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -8,7 +8,7 @@ msgid ""
|
||||||
msgstr ""
|
msgstr ""
|
||||||
"Project-Id-Version: PACKAGE VERSION\n"
|
"Project-Id-Version: PACKAGE VERSION\n"
|
||||||
"Report-Msgid-Bugs-To: \n"
|
"Report-Msgid-Bugs-To: \n"
|
||||||
"POT-Creation-Date: 2009-04-04 18:19-0400\n"
|
"POT-Creation-Date: 2009-04-04 18:50-0400\n"
|
||||||
"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
|
"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
|
||||||
"Last-Translator: FULL NAME <EMAIL@ADDRESS>\n"
|
"Last-Translator: FULL NAME <EMAIL@ADDRESS>\n"
|
||||||
"Language-Team: LANGUAGE <LL@li.org>\n"
|
"Language-Team: LANGUAGE <LL@li.org>\n"
|
||||||
|
|
Loading…
Reference in New Issue