[Pkg-fonts-devel] Bug#665334: [fontforge] generic bug
Bastien ROUCARIES
bastien.roucaries at u-cergy.fr
Sat Nov 24 16:03:09 UTC 2012
control: clone -1
Control: retitle -1 A lot of type 1 fonts include Adobe all right reserved code
Control: reassign -1 generic
On my debian box they are 34 font file included adobe all right reserved code
find . -name *.pfb -exec t1disasm {} \; | grep -i "Copyright (c) 1987-1990 Adobe Systems Incorporated." | wc
34 238 1836
Code snippet is here;
% Copyright (c) 1987-1990 Adobe Systems Incorporated.
% All Rights Reserved.
% This code to be used for Flex and hint replacement.
% Version 1.1
[ systemdict /internaldict known
{1183615869 systemdict /internaldict get exec
/FlxProc known {save true} {false} ifelse}
{userdict /internaldict known not {
userdict /internaldict
{count 0 eq
{/internaldict errordict /invalidaccess get exec} if
dup type /integertype ne
{/internaldict errordict /invalidaccess get exec} if
dup 1183615869 eq
{pop 0}
{/internaldict errordict /invalidaccess get exec}
ifelse
}
dup 14 get 1 25 dict put
bind executeonly put
} if
1183615869 userdict /internaldict get exec
/FlxProc known {save true} {false} ifelse}
ifelse
[
systemdict /internaldict known not
{100 dict /begin cvx /mtx matrix /def cvx} if
systemdict /currentpacking known {currentpacking true setpacking} if
{
systemdict /internaldict known {
1183615869 systemdict /internaldict get exec
dup /$FlxDict known not {
dup dup length exch maxlength eq
{pop userdict dup /$FlxDict known not
{100 dict begin /mtx matrix def
dup /$FlxDict currentdict put end} if}
{100 dict begin /mtx matrix def
dup /$FlxDict currentdict put end}
ifelse
} if
/$FlxDict get begin
More information about the Pkg-fonts-devel
mailing list