From d61d5345124e9df8134cf8b84e60a30d0ba20f3e Mon Sep 17 00:00:00 2001 From: Luiz Rafael Culik Date: Mon, 7 Jan 2002 19:25:31 +0000 Subject: [PATCH] See changelog 2002-01-07 17:30 UTC-0300 --- harbour/ChangeLog | 5 +++++ harbour/source/rtl/direct.c | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index e6035f1b4a..58de11098b 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -7,6 +7,11 @@ For example: 2002-12-01 23:12 UTC+0100 Foo Bar */ + +2002-01-08 09:52 UTC+0100 Patrick Mast + * source/compiler/genc.c + * source/compiler/genjava.c + * source/compiler/genobj32.c * source/compiler/hbusage.c * source/common/hbver.c * changed decimal build nr in "Alpha build .." diff --git a/harbour/source/rtl/direct.c b/harbour/source/rtl/direct.c index d75cf21367..c9090780f5 100644 --- a/harbour/source/rtl/direct.c +++ b/harbour/source/rtl/direct.c @@ -117,7 +117,7 @@ HB_FUNC( DIRECTORY ) /* Get the passed attributes and convert them to Harbour Flags */ - uiMask = HB_FA_ARCHIVE | HB_FA_READONLY; + uiMask = HB_FA_ARCHIVE | HB_FA_NORMAL; if( pAttributes && hb_itemGetCLen( pAttributes ) > 0 ) uiMask |= hb_fsAttrEncode( hb_itemGetCPtr( pAttributes ) );