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 */