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

2003-05-06 12:55 UTC+0200 Przemyslaw Czerpak <druzus@polbox.com>

Browse Source
This commit is contained in:
Alexander S.Kresin
2003-05-06 09:53:37 +00:00
parent 56f0f0d96b
commit 09aea7b646
2 changed files with 10 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -8,6 +8,12 @@
2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2003-05-06 12:55 UTC+0200 Przemyslaw Czerpak <druzus@polbox.com>
* source/rtl/set.c
! Fixed very serious bug in set(_SET_ALTFILE, "") and
set(_SET_EXTRAFILE, "") which can caused corrupting any files
open by Harbour compiled program
2003-05-06 12:45 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
* contrib/rdd_ads/ads1.c
! Bug fixed in adsOrderListClear() - the current order is set to 0 now

4
harbour/source/rtl/set.c
View File

@@ -463,6 +463,8 @@ HB_FUNC( SET )
close_text( hb_set.hb_set_althan );
if( hb_set.HB_SET_ALTFILE && strlen( hb_set.HB_SET_ALTFILE ) > 0 )
hb_set.hb_set_althan = open_handle( hb_set.HB_SET_ALTFILE, bFlag, ".txt", HB_SET_ALTFILE );
else
hb_set.hb_set_althan = FS_ERROR;
}
break;
case HB_SET_AUTOPEN :
@@ -650,6 +652,8 @@ HB_FUNC( SET )
close_text( hb_set.hb_set_extrahan );
if( hb_set.HB_SET_EXTRAFILE && strlen( hb_set.HB_SET_EXTRAFILE ) > 0 )
hb_set.hb_set_extrahan = open_handle( hb_set.HB_SET_EXTRAFILE, bFlag, ".prn", HB_SET_EXTRAFILE );
else
hb_set.hb_set_extrahan = FS_ERROR;
}
break;
case HB_SET_FIXED :