diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 890208505f..fa8cf908a0 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,7 @@ +19990529-15:00 CET Eddie Runia + * source/rtl/set.c + small correction in ReleaseSets() + 19990528-14:30 EST David G. Holm * source/rtl/console.c - NIL ouptuts "NIL", just like it used to before I removed it after diff --git a/harbour/source/rtl/set.c b/harbour/source/rtl/set.c index 95ea3eaa8b..8afac30a40 100644 --- a/harbour/source/rtl/set.c +++ b/harbour/source/rtl/set.c @@ -464,8 +464,8 @@ void InitializeSets (void) void ReleaseSets (void) { - if (hb_set_althan) close_text (hb_set_althan); - if (hb_set_printhan) close (hb_set_printhan); + if (hb_set_althan != -1) close_text (hb_set_althan); + if (hb_set_printhan != -1) close (hb_set_printhan); if (hb_set.HB_SET_ALTFILE) _xfree (hb_set.HB_SET_ALTFILE); @@ -482,5 +482,5 @@ void ReleaseSets (void) if (hb_set.HB_SET_PATH) _xfree (hb_set.HB_SET_PATH); if (hb_set.HB_SET_PRINTFILE) - _xfree (hb_set.HB_SET_PATH); + _xfree (hb_set.HB_SET_PRINTFILE); }