diff options
Diffstat (limited to 'ssg')
-rwxr-xr-x | ssg | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -161,12 +161,11 @@ sub run_on { # 3) die if the output file is in the input directory. next if $outfile eq $mddir; next if $outfile =~ m/(\.|\.\.)($|\/)/; - $outfile =~ s/^$indir\//$outdir\//g; - $outfile !~ m/^$indir/ or die "trying to write in the same directory"; + $outfile =~ s/^$indir/$outdir/g; + $outfile !~ m/^$indir/ or die "trying to write in the same directory $outfile"; if($file->is_dir()) { # make a directory - print STDERR "calling on directory $outfile\n"; make_path $outfile; run_on($file); next; |