Ok, well I had done
| a |
a := OrderedCollection new.
IPhoneWikiServerUI kernel root enumerator
with;
all;
do:
[ :each | each class = PRPage ifTrue: [a add:
each]].
stream := StandardFileStream forceNewFileNamed: 'exportedWikiData.txt'.
[a do: [:e |
stream nextPutAll: '**********##########';cr.
stream nextPutAll: e name;cr.
stream nextPutAll: '##########**********';cr.
stream nextPutAll: e contents;cr.]]
ensure: [stream close].
I'm not sure if the "e contents" does the same thing as the
"PRWikiWriter write: each document to: "
On 29-Jul-09, at 12:15 AM, Lukas Renggli wrote:
>> I was going to tackle making a component or method on the import/
>> export
>> component to exportt
>> all the pages in Pier in Wiki format. I"m wondering if anyone has
>> done this
>> before?
>
> There isn't anything out of the box, but it is rather simple to do.
> Try something along the following lines:
>
> aKernel root enumerator all
> do: [ :each | PRWikiWriter write: each document to: aStream ]
>
> Lukas
>
> --
> Lukas Renggli
>
http://www.lukas-renggli.ch--
=
=
=
========================================================================
John M. McIntosh <
[hidden email]> Twitter:
squeaker68882
Corporate Smalltalk Consulting Ltd.
http://www.smalltalkconsulting.com=
=
=
========================================================================
_______________________________________________
Magritte, Pier and Related Tools ...
https://www.iam.unibe.ch/mailman/listinfo/smallwiki
Locked
