diestack("Too many arguments") if (defined($rest));
diestack("Sourcefilename not defined") if (! defined($source));
diestack("Destfilename not defined") if (! defined($dest));
-diestack("FoNamunrmat (e.g. pdf4) not defined") if (! defined($format));
+diestack("Format (e.g. pdf4) not defined") if (! defined($format));
diestack("Font type (e.g. texF) not defined") if (! defined($fontT));
$source = File::Spec->rel2abs($source);
$lang = $1;
}
if ($fontT eq "systemF") {
- if ($lang =~ /^(he|el|ru|uk|main)$/) {
+ if ($lang =~ /^(ru|uk)$/) {
+ $font{roman} = "DejaVu Serif";
+ $font{sans} = "DejaVu Sans";
+ $font{typewriter} = "DejaVu Sans Mono";
+ }
+ elsif ($lang =~ /^(he|el|main)$/) {
$font{roman} = "FreeSans";
$font{sans} = "FreeSans";
$font{typewriter} = "FreeSans";
$font{sans} = "NanumGothic";
$font{typewriter} = "NanumGothic";
}
+ elsif ($lang eq "ar" ) {
+ # available in 'fonts-sil-scheherazade' package
+ $font{roman} = "Scheherazade";
+ $font{sans} = "Scheherazade";
+ $font{typewriter} = "Scheherazade";
+ }
else {
# default system fonts
$font{roman} = "FreeSans";