Move handling of LFUN_COPY to BufferView

[lyx.git] / development / autotests / useSystemFonts.pl

diff --git a/development/autotests/useSystemFonts.pl b/development/autotests/useSystemFonts.pl
index 12c98507653f6f0f9efec85a11893370f05e69ce..c3e6a802748bff29b569fe994dd2218282a435b4 100644 (file)
--- a/development/autotests/useSystemFonts.pl
+++ b/development/autotests/useSystemFonts.pl
@@ -182,7 +182,7 @@ sub interpretedCopy($$$$)
     $fi_line_no += 1;
     $l =~ s/[\n\r]+$//;
     #chomp($l);
-    my $rStatus = checkLyxLine($l);
+    my $rStatus = checkLyxLine($l, $sourcedir);
     if ($rStatus->{found}) {
       my $rF = $rStatus->{result};
       if ($rStatus->{"filetype"} eq "replace_only") {
@@ -203,6 +203,10 @@ sub interpretedCopy($$$$)
            my $ext = $isrel[1];
            if ($rStatus->{"filetype"} eq "prefix_only") {
              $f = getNewNameOf("$sourcedir/$f", $rFiles);
+             if ($format eq "docbook5") {
+               $rF->[1] = join(',', @{$filelist});
+               $l =  join('', @$rF);
+             }
            }
            else {
              my ($newname, $res1);
@@ -258,8 +262,10 @@ sub interpretedCopy($$$$)
            }
          }
        }
-       if ($foundrelative) {
+       if ($foundrelative && $rStatus->{"filetype"} !~ /^(prefix_for_list|prefix_only)$/) {
           # The result can be relative too
+          # but, since prefix_for_list does no copy, we have to use absolute paths
+          # to address files inside the source dir
           my @rel_list = ();
           for my $fr (@{$filelist}) {
             push(@rel_list, File::Spec->abs2rel($fr, $destdir));