--- jeedosaquin.pl-1.1 Tue Feb 26 09:10:24 2002 +++ jeedosaquin.pl Fri May 10 07:23:38 2002 @@ -106,11 +106,13 @@ # else { # regular file, not html-split # $mknmz::parent_file_name = $cfile; # keep previous name # } - if ($cfile =~ m|(.*)\.([^/]+)/\d+\.(.*)$|) { # jeedosaquin naming rule + if ($cfile =~ m|(.*/)\.([^/]+)/\d+\.(.*)$|) { # jeedosaquin naming rule + $dir = $1; $proj = $2; $uri = $3; - + util::dprint("jeedosaquin: cfile($cfile)\n"); + util::dprint("jeedosaquin: dir($dir) proj($proj) uri($uri)\n"); $fields->{'uri'} = $dir.$proj.'/'.$uri; if ($partial_flag) { $fields->{'uri'} .= '#'.$fragment }