--- loncom/build/lpml_parse.pl 2001/09/08 22:44:45 1.6 +++ loncom/build/lpml_parse.pl 2001/09/08 22:51:26 1.8 @@ -579,8 +579,8 @@ sub format_directory { return $directory="\nDIRECTORY $targetdir $categoryname $description"; } elsif ($mode eq 'install') { - return "\t".'install '.$categoryhash{$categoryname}.' -d /'. - $targetroot.$targetdir."\n"; + return "\t".'install '.$categoryhash{$categoryname}.' -d '. + $targetroot.'/'.$targetdir."\n"; } else { return ''; @@ -668,14 +668,14 @@ sub format_file { "\nEND FILE"); } elsif ($mode eq 'install' && $categoryname ne 'conf') { - return "\t".'@test -e '.$sourceroot.$source. + return "\t".'@test -e '.$sourceroot.'/'.$source. ' && install '. $categoryhash{$categoryname}.' '. - $sourceroot.$source.' '. - $targetroot.$target. + $sourceroot.'/'.$source.' '. + $targetroot.'/'.$target. ' || echo "**** LON-CAPA WARNING '. - '**** CVS source file does not exist: '.$sourceroot.$source. - '"'."\n"; + '**** CVS source file does not exist: '.$sourceroot.'/'. + $source.'"'."\n"; } else { return '';