diff options
Diffstat (limited to 'Votify.pm')
-rw-r--r-- | Votify.pm | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -132,8 +132,9 @@ sub get_single_election_hashref { #print STDERR "Scan $fn\n"; my @filenames = (sprintf("%s/%s", "$basedir/$election_name", $fn), sprintf("%s/%s-%s", "$basedir/$election_name", $fn, $election_name)); #print STDERR Dumper(@filenames); - my $filename = abs_path(List::Util::first { $_ && -r $_ && -s $_ && ! -d $_ } @filenames); - $election{"${fn}file"} = $filename; + my $filename = List::Util::first { $_ && -r $_ && -s $_ && ! -d $_ } @filenames; + my $absfilename = abs_path($filename) if $filename; + $election{"${fn}file"} = $absfilename if $absfilename; }; #print Dumper(%election); $election{starttime} = grabfile_int($election{'startfile'}); |