2013-04-07 13:07 UTC+0200 Viktor Szakats (harbour syenar.net)

* bin/check.hb * tests/fixcase.hb * minor cleanups * tests/fixcase.hb + work regardless of cwd
2013-04-07 13:07:43 +02:00
parent 15cea3807f
commit 528c97e956
3 changed files with 20 additions and 18 deletions
--- a/bin/check.hb
+++ b/bin/check.hb
@@ -788,12 +788,7 @@ STATIC FUNCTION FixFuncCase( cFileName )
   cFile := MemoRead( _HBROOT_ + cFileName )

   lPartial := hb_FNameExt( cFileName ) $ sc_hPartial
-
-   IF lPartial
-      cFileStripped := GetCComments( cFile )
-   ELSE
-      cFileStripped := cFile
-   ENDIF
+   cFileStripped := iif( lPartial, GetCComments( cFile ), cFile )

   cOldCP := hb_cdpSelect( "EN" )