CVSROOT: /cvsroot/groff
Module name: groff
Changes by: Werner LEMBERG <wl> 13/07/31 20:19:56
Modified files:
. : ChangeLog
src/devices/gropdf: gropdf.pl
Log message:
Fix overprinting issue with Acrobat reader.
Problem reported by Heinz-Jürgen Oertel <[email protected]>.
* src/devices/gropdf/gropdf.pl (do_t, FindChar): Use ascii octal
notation (i.e., \015) when outputting characters with value < 32.
This fixes a bug which affected acroread when control-M (cr) was
embedded in a text string.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/groff/ChangeLog?cvsroot=groff&r1=1.1432&r2=1.1433
http://cvs.savannah.gnu.org/viewcvs/groff/src/devices/gropdf/gropdf.pl?cvsroot=groff&r1=1.13&r2=1.14
Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/groff/groff/ChangeLog,v
retrieving revision 1.1432
retrieving revision 1.1433
diff -u -b -r1.1432 -r1.1433
--- ChangeLog 16 Jul 2013 14:32:02 -0000 1.1432
+++ ChangeLog 31 Jul 2013 20:19:56 -0000 1.1433
@@ -1,3 +1,14 @@
+2013-07-31 Deri James <[email protected]>
+
+ Fix overprinting issue with Acrobat reader.
+
+ Problem reported by Heinz-Jürgen Oertel <[email protected]>.
+
+ * src/devices/gropdf/gropdf.pl (do_t, FindChar): Use ascii octal
+ notation (i.e., \015) when outputting characters with value < 32.
+ This fixes a bug which affected acroread when control-M (cr) was
+ embedded in a text string.
+
2013-07-16 Werner LEMBERG <[email protected]>
* tmac/fallbacks.tmac: Make it work in compatibility mode.
Index: src/devices/gropdf/gropdf.pl
===================================================================
RCS file: /cvsroot/groff/groff/src/devices/gropdf/gropdf.pl,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -b -r1.13 -r1.14
--- src/devices/gropdf/gropdf.pl 15 Apr 2013 14:47:42 -0000 1.13
+++ src/devices/gropdf/gropdf.pl 31 Jul 2013 20:19:56 -0000 1.14
@@ -3068,7 +3068,7 @@
$xpos+=($pendmv-$nomove)/$unitwidth;
$stream.="% == '$par'=$wid 'xpos=$xpos\n" if $debug;
- $par=~s/\\/\\\\/g;
+ $par=~s/\\(?!\d\d\d)/\\\\/g;
$par=~s/\)/\\)/g;
$par=~s/\(/\\(/g;
@@ -3198,7 +3198,7 @@
my $ch=$fnt->{GNM}->{$chnm};
$ch=RemapChr($ch,$fnt,$chnm) if ($ch > 255);
- return(chr($ch),$fnt->{WID}->[$ch]*$cftsz);
+
return(($ch<32)?sprintf("\\%03o",$ch):chr($ch),$fnt->{WID}->[$ch]*$cftsz);
}
else
{
_______________________________________________
Groff-commit mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/groff-commit