From d4af55e67ed6570fbd7169e41b1d3d66d8147068 Mon Sep 17 00:00:00 2001 From: Paul Tucker Date: Mon, 14 Jan 2002 19:40:41 +0000 Subject: [PATCH] 2002-01-14 14:30 UTC-0500 Paul Tucker --- harbour/source/rtl/direct.c | 3 +++ 1 file changed, 3 insertions(+) diff --git a/harbour/source/rtl/direct.c b/harbour/source/rtl/direct.c index 9f914ef023..ed97930bcf 100644 --- a/harbour/source/rtl/direct.c +++ b/harbour/source/rtl/direct.c @@ -149,7 +149,10 @@ HB_FUNC( DIRECTORY ) if( pAttributes && hb_itemGetCLen( pAttributes ) > 0 ) if ( ( uiMask |= hb_fsAttrEncode( hb_itemGetCPtr( pAttributes ) ) ) & HB_FA_LABEL ) + { + /* NOTE: This is Clipper Doc compatible. (not operationally) */ uiMask = HB_FA_LABEL; + } /* Get the file list */