[Lazarus] Howto work with wikiget and wikiconvert tools

Frieß friess at gmx.at
Mon Jan 19 19:27:03 CET 2015


Am 19.01.2015 um 18:53 schrieb Mattias Gaertner:
> On Mon, 19 Jan 2015 17:32:37 +0100
> Frieß <friess at gmx.at> wrote:
>
>> Am 19.01.2015 um 17:17 schrieb Mattias Gaertner:
>>> On Mon, 19 Jan 2015 15:50:38 +0100
>>> Frieß <friess at gmx.at> wrote:
>>>
>>>> [...]
>>>> At this time i have found the tools in the directories of Lazarus !! in
>>>> component/wiki. This tools look better So i have try to use the tools.
>>>> Its look running, but i have not enough knowledge about the handling
>>>> with the tools.
>>>>
>>>> I see the last checkin was 2012, whats happen with this tools ? Not used
>>>> anywhere, stopped ? Project dead ?
>>> No. I just had some other priorities.
>> I see, fpc and Lazarus are growing fast. Is there more information
>> available or only the source ?
> The source and the README.
>
>
>>>> May i help to get this tools working ?
>>> They were working. I see wikiget has now a problem with an overlong
>>> filename from a strange wiki page.
>>> Feel free to improve it.
>> This is not directly a problem from wikiget, it comes from russian
>> pagenames instead of pagename/ru.
>> So is one question, should this corrected in the wiki or accepted by the
>> wikiget ?
> If it is only a few pages, it may be easier to fix it in the wiki.
> Otherwise we need a different system for storing the pages.
Ok, i look for a workaround in the wikiget, not to store this sites and 
to get a message.
i have done a quick and dirty fix to see the wikiget running, but it was 
not the best way. I will try a better soloution.

--- C:/Users/andi/AppData/Local/Temp/wikiget.lpr-revBASE.svn003.tmp.lpr 
Mo 26. Mär 20:28:31 2012
+++ X:/Pascal/Pascal/lazarus/components/wiki/wikiget.lpr    So 18. Jän 
16:19:44 2015
@@ -296,7 +296,7 @@
            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)) and 
(Page[1]<>'%') then begin;
              //writeln('TWikiGet.GetAll Page="',Page,'"');
              Filename:=PageToFilename(Page,false);
              AddWikiPage(Page);

> Mattias
>
> --
> _______________________________________________
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus





More information about the Lazarus mailing list