commit 87ccd23047ceacf5e7b028650b8fde7a2c5a7279
Author: Kornel Benko <[email protected]>
Date: Wed Jun 21 00:09:50 2017 +0200
Cmake export tests: Missed second parameter for writeConverters()
Unfortunatelly the prototype checking in perl is not very
sophisticated.
---
lib/scripts/prefTest.pm | 11 +++++++++--
1 files changed, 9 insertions(+), 2 deletions(-)
diff --git a/lib/scripts/prefTest.pm b/lib/scripts/prefTest.pm
index d5b3469..814304f 100644
--- a/lib/scripts/prefTest.pm
+++ b/lib/scripts/prefTest.pm
@@ -13,6 +13,7 @@ sub getConverters($$$);
sub getConverter($$);
sub getNext($);
sub writeConverters($$);
+sub createConvLine($$);
sub getSubstitutes($$@)
{
@@ -78,7 +79,7 @@ sub getConverter($$)
($l, $from) = getNext($l);
return undef if ($from !~ /tex$/);
($l, $to) = getNext($l);
- return undef if ($to !~ /^(dvi3?|pdf[23456]?)$/);
+ return undef if ($to !~ /^((dvi3?|pdf[23456]?)(log)?)$/);
($l, $cmd) = getNext($l);
if ($add) {
if ($cmd !~ /\-shell-escape/) {
@@ -165,9 +166,15 @@ sub applyChanges($$$$)
}
else {
$rConverter->{$key}->[2] = 1;
- $l = &createConvLine($key);
+ $l = &createConvLine($key, $rConverter);
}
}
+ else {
+ # Converter defined only in preferences
+ $rConverter->{$key} = $entry->[1];
+ $rConverter->{$key}->[2] = 1;
+ $l = &createConvLine($key, $rConverter);
+ }
}
}
else {