Another minor improvement to findconfigvars.pl

addrummond · Jul 23, 2010 · 1103f48 · 1103f48
1 parent 770d4e6
commit 1103f48
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/findconfigvars.pl b/findconfigvars.pl
@@ -11,7 +11,7 @@
             open(my $f, $_);
 	    my $line = 1;
             for my $l (<$f>) {
-                if ($l =~ /IbexFarm->config->{([^}]+)}/) { push @confs, { varname => "$1", filename => $_, line => $line } ; }
+                if ($l =~ /IbexFarm->config->{([^}]+)}/) { push @confs, { varname => "$1", filename => $File::Find::name, line => $line } ; }
 		++$line;
             }
         }