diff --git a/components/wiki/wikiget.lpi b/components/wiki/wikiget.lpi index 1241aaed1a..84ca522002 100644 --- a/components/wiki/wikiget.lpi +++ b/components/wiki/wikiget.lpi @@ -1,4 +1,4 @@ - + @@ -29,7 +29,6 @@ - @@ -48,7 +47,6 @@ - @@ -61,12 +59,6 @@ - - - - - - diff --git a/components/wiki/wikiget.lpr b/components/wiki/wikiget.lpr index 8b3f9d720d..c9a4662b6d 100644 --- a/components/wiki/wikiget.lpr +++ b/components/wiki/wikiget.lpr @@ -296,7 +296,7 @@ begin Page:=copy(s,StartPos,p-StartPos); while (Page<>'') and (Page[1]='/') do System.Delete(Page,1,1); - if (Page<>'') and (not IsIgnoredPage(Page)) then begin; + if (Page<>'') and (not IsIgnoredPage(Page)) then begin //writeln('TWikiGet.GetAll Page="',Page,'"'); Filename:=PageToFilename(Page,false); AddWikiPage(Page); @@ -790,6 +790,8 @@ end; var Application: TWikiGet; begin + //TestWikiPageToFilename; + Application:=TWikiGet.Create(nil); Application.Title:='Wiki Get'; Application.Run;