diff --git a/harbour/ChangeLog b/harbour/ChangeLog index ad210a237d..f053a4259b 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,14 +16,21 @@ The license applies to all entries newer than 2009-04-28. */ +2012-07-31 15:10 UTC+0200 Viktor Szakats (harbour syenar.net) + * bin/hbfind.hb + % minor + + * ChangeLog + * minor updates to examples in prev two + 2012-07-31 15:00 UTC+0200 Viktor Szakats (harbour syenar.net) + bin/hbfind.hb + added script to list and/or find public symbols in Harbour core and contribs (and some extras). To list all symbols (functions, classes): - $ hbrun bin/hbfind.hb + $ hbrun bin/hbfind To find string in symbols (case-insensitive): - $ hbrun bin/hbfind.hb vol + $ hbrun bin/hbfind vol 2012-07-31 14:50 UTC+0200 Viktor Szakats (harbour syenar.net) * contrib/hbide/projectwizard.prg @@ -53,10 +60,12 @@ then: --- myproject.hbp mydefaultprojectsetting.hbm + # ... --- or --- myproject.hbp mydefaultprojectsetting.hbc + # ... --- respecitvely. diff --git a/harbour/bin/hbfind.hb b/harbour/bin/hbfind.hb index 09ff8785bd..bccb4f0e04 100644 --- a/harbour/bin/hbfind.hb +++ b/harbour/bin/hbfind.hb @@ -34,7 +34,7 @@ PROCEDURE Main( cContains ) RETURN -PROCEDURE WalkDir( cDir, cContains ) +STATIC PROCEDURE WalkDir( cDir, cContains ) LOCAL aFile FOR EACH aFile IN Directory( cDir + hb_osFileMask(), "D" ) @@ -48,7 +48,7 @@ PROCEDURE WalkDir( cDir, cContains ) RETURN -PROCEDURE ProcessFile( cFileName, cContains ) +STATIC PROCEDURE ProcessFile( cFileName, cContains ) LOCAL cDynamic LOCAL lFirst := .T.