fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2007-08-19 17:00 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)

Browse Source 
* source/rtl/tgetlist.prg
     ! Fixed crash when bad date is detected. (:TypeOut was 
       used in an assignment)
This commit is contained in:
Viktor Szakats
2007-08-19 15:01:17 +00:00
parent dc32c65541
commit e1a84b55ec
2 changed files with 7 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -8,6 +8,11 @@
2002-12-01 13:30 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2007-08-19 17:00 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* source/rtl/tgetlist.prg
! Fixed crash when bad date is detected. (:TypeOut was
used in an assignment)
2007-08-19 12:58 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* source/rtl/tget.prg
! Fixed bug where negative number in get buffer beginning

6
harbour/source/rtl/tgetlist.prg
View File

@@ -413,8 +413,7 @@ METHOD GetPostValidate() CLASS HBGetList
endif
if oGet:BadDate
// oGet:SetFocus()
oGet:TypeOut := .f.
oGet:home()
::DateMsg()
::ShowScoreboard()
return .f.
@@ -995,8 +994,7 @@ METHOD GUIPostValidate( oGUI ) CLASS HBGetList
endif
if oGet:BadDate
// oGet:SetFocus()
oGet:TypeOut := .f.
oGet:home()
::DateMsg()
::ShowScoreboard()
return .f.