$p = $2;
$foo = expandfile ($p, %var);
}
- printf " \\\n %s", $foo;
+ printf " \\\n\t%s", $foo;
findincludes ($foo, %var);
}
}
%var=();
for $f (@FILES) {
$foo = $f;
- $foo =~ s/\.wml$/\.html/;
+ $foo =~ s/\.wml$/\.php3/;
printf "%s: %s", $foo, $f;
findincludes ($f, %var);
print "\n";