19991006-20:11 GMT+1

1999-10-06 18:23:23 +00:00
parent d0c136842f
commit 9933c1940e
2 changed files with 5 additions and 0 deletions
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+19991006-20:11 GMT+1 Victor Szel <info@szelvesz.hu>
+   * source/rtl/tgetlist.prg
+     ! ReadExit() added back as method.
+
 19991006-19:14 GMT+1 Antonio Linares <alinares@fivetech.com>
   * source/rtl/classes.c
     * Fixed bug for CLASSDATAs INIT clause.
--- a/harbour/source/rtl/tgetlist.prg
+++ b/harbour/source/rtl/tgetlist.prg
@@ -105,6 +105,7 @@ CLASS TGetList
   METHOD GetActive( oGet )
   METHOD ShowScoreBoard()
   METHOD ReadVar( cNewVarName )
+   METHOD ReadExit( lNew ) INLINE Set( _SET_EXIT, lNew )

 ENDCLASS