|
|
@@ -144,6 +144,10 @@ Unit oCrt;
|
|
|
| 1) Added nReadScr, nReadScrStr, nReadScrColor, nWriteScrStr,
|
|
|
| nGrabScreen, nPopScreen, nReleaseScreen.
|
|
|
| 2) Fixed some trouble with PrevWn accuracy.
|
|
|
+ 2.16.01 | 05/26/2009 | kjw |
|
|
|
+ | 1) Corrected error with tnWindow.PutFrame and wattr_get. Recent
|
|
|
+ | updates to ncurses and ocrt by the FreePascal team introduced an
|
|
|
+ | error with tnWindow.PutFrame's use of wattr_get.
|
|
|
------------------------------------------------------------------------------
|
|
|
}
|
|
|
Interface
|
|
|
@@ -858,10 +862,11 @@ Var
|
|
|
x,y,
|
|
|
mx,my,
|
|
|
atts : longint;
|
|
|
+ junk : smallint;
|
|
|
|
|
|
Begin
|
|
|
wbkgd(win,COLOR_PAIR(nSetColorPair(att)));
|
|
|
- atts := wattr_get(win,nil,Nil,nil);
|
|
|
+ wattr_get(win,@atts,@junk,nil);
|
|
|
If nisbold(att) then wattr_on(win,atts or A_BOLD,Nil);
|
|
|
box(win,ACS_VLINE,ACS_HLINE);
|
|
|
framecolor := att;
|
michael