paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-16 13:19:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

* enable acs on xterm by default

Browse Source
This commit is contained in:
armin 2004-10-05 17:16:24 +00:00
parent b39c0af01b
commit c6e7e58903
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/unix/video.pp
View File

@ -703,6 +703,8 @@ begin
ACSIn:=Copy(ACSIn,1,Pos('$<',ACSIn)-1); ACSIn:=Copy(ACSIn,1,Pos('$<',ACSIn)-1);
if pos('$<',ACSOut)>0 then if pos('$<',ACSOut)>0 then
ACSOut:=Copy(ACSOut,1,Pos('$<',ACSOut)-1); ACSOut:=Copy(ACSOut,1,Pos('$<',ACSOut)-1);
If fpGetEnv('TERM')='xterm' then
NoExtendedFrame := true; {use of acs for xterm is ok}
end end
else else
begin begin
@ -903,7 +905,10 @@ initialization
end. end.
{ {
$Log$ $Log$
Revision 1.24 2004-10-03 20:16:43 armin Revision 1.25 2004-10-05 17:16:24 armin
* enable acs on xterm by default
Revision 1.24 2004/10/03 20:16:43 armin
* SysUpdateScreen modified esi and edi * SysUpdateScreen modified esi and edi
Revision 1.23 2004/07/09 19:03:35 peter Revision 1.23 2004/07/09 19:03:35 peter