|
|
@@ -365,10 +365,10 @@ begin
|
|
|
Val(copy(Name,2,255),Code,CC);
|
|
|
if CC<>0 then Code:=-1;
|
|
|
end;
|
|
|
- if (Name='lt') then E:='<' else { less-than sign }
|
|
|
- if (Name='gt') then E:='>' else { greater-than sign }
|
|
|
- if (Name='amp') then E:='&' else { ampersand }
|
|
|
- if (Name='quot') then E:='"' else { double quote sign }
|
|
|
+ if (Code=$3C) or (Name='lt') then E:='<' else { less-than sign }
|
|
|
+ if (Code=$3E) or (Name='gt') then E:='>' else { greater-than sign }
|
|
|
+ if (Code=$26) or (Name='amp') then E:='&' else { ampersand }
|
|
|
+ if (Code=$22) or (Name='quot') then E:='"' else { double quote sign }
|
|
|
if (Code=160) or (Name='nbsp') then E:=#255 else { no-break space }
|
|
|
if (Code=161) or (Name='iexcl') then E:='' else { inverted excalamation mark }
|
|
|
if (Code=162) or (Name='cent') then E:='›' else { cent sign }
|
|
|
@@ -466,9 +466,10 @@ begin
|
|
|
(* if (Code=254) or (Name='thorn') then E:='?' else { small thorn, Icelandic }*)
|
|
|
if (Code=255) or (Name='yuml') then E:='y' else { small y, dieresis or umlaut }
|
|
|
if (Code=8217) then E:='''' else { acute accent as generated by TeXH }
|
|
|
- if (Code=$FB00) then E:='ff' else { ff together }
|
|
|
- if (Code=$FB01) then E:='fi' else { fi together }
|
|
|
- if (Code=$FB02) then E:='fl' else { fl together }
|
|
|
+ if (Code=$FB00) then E:='ff' else { ff together }
|
|
|
+ if (Code=$FB01) then E:='fi' else { fi together }
|
|
|
+ if (Code=$FB02) then E:='fl' else { fl together }
|
|
|
+ if (Code=$FB03) then E:='ffi' else { ffi together }
|
|
|
Found:=false;
|
|
|
DocDecodeNamedEntity:=Found;
|
|
|
end;
|
pierre