From renggli at gmail.com  Tue Apr  5 18:08:26 2011
From: renggli at gmail.com (Lukas Renggli)
Date: Tue, 5 Apr 2011 18:08:26 +0200
Subject: adding style with images to pier
In-Reply-To: <DC97DB65-CA56-4458-BC37-164B7A9C23CD@gmail.com>
References: <DC97DB65-CA56-4458-BC37-164B7A9C23CD@gmail.com>
Message-ID: <BANLkTi=qfjkUVLiRwXuUn=_OxYFJyNHr1w@mail.gmail.com>

Hi Esteban,

sorry for the slow reply.

> For example, I have this style:
>
> .aclass {
> ? ? ? ?background-image: url(background.png);
> }
>
> so... I upload the style to /system/components/css/style.css, and I change my page to use that css.

Use something like (from the default style of Pier):

     background: url(/pier/environment/pier.png?view=PRDownloadView);

If you refer to 'background.png' Pier will serve a HTML page.

> Also... I would like to add some meta information (a couple of <link> rels), and no idea how to do it... any idea?

Embed a Seaside component that implements #updateRoot: and generates the links.

Lukas

-- 
Lukas Renggli
www.lukas-renggli.ch


From norbert at hartl.name  Thu Apr 14 15:17:02 2011
From: norbert at hartl.name (Norbert Hartl)
Date: Thu, 14 Apr 2011 15:17:02 +0200
Subject: RSS filter by tags
Message-ID: <FC30D948-C33C-41F0-BB28-324FCC2D1417@hartl.name>

Some time ago I changed PBEntriesRSSView to be able to filter entries by tags. It is useful if you are subscribed to e.g. planet smalltalk. This way only posts that are tagged properly will be included. But I forgot to drop a note about it.

Today I've been asked about it and that made me do a small changeset in case somebody wants to know. I'm not sure if this should be included in default pier hence the changeset.

Hope you like it,

Norbert

-------------- next part --------------
A non-text attachment was scrubbed...
Name: pier-rss-filter.1.cs
Type: application/octet-stream
Size: 1160 bytes
Desc: not available
URL: <http://www.iam.unibe.ch/pipermail/smallwiki/attachments/20110414/9e183e28/attachment.obj>

From norbert at hartl.name  Thu Apr 14 15:31:41 2011
From: norbert at hartl.name (Norbert Hartl)
Date: Thu, 14 Apr 2011 15:31:41 +0200
Subject: RSS filter by tags
In-Reply-To: <FC30D948-C33C-41F0-BB28-324FCC2D1417@hartl.name>
References: <FC30D948-C33C-41F0-BB28-324FCC2D1417@hartl.name>
Message-ID: <FB15D57A-5250-474E-8F48-0ACAE989FF9D@hartl.name>

Er,

and if you use the changeset you can add a paramter tags to your feed url.

http://norbert.hartl.name/blog/?view=PBEntriesRssView&tags=smalltalk

gives all posts that are tagged with smalltalk. The parameter can take multiple tags separated by comma (,)

Norbert
Am 14.04.2011 um 15:17 schrieb Norbert Hartl:

> Some time ago I changed PBEntriesRSSView to be able to filter entries by tags. It is useful if you are subscribed to e.g. planet smalltalk. This way only posts that are tagged properly will be included. But I forgot to drop a note about it.
> 
> Today I've been asked about it and that made me do a small changeset in case somebody wants to know. I'm not sure if this should be included in default pier hence the changeset.
> 
> Hope you like it,
> 
> Norbert
> 
> <pier-rss-filter.1.cs>_______________________________________________
> Magritte, Pier and Related Tools ...
> https://www.iam.unibe.ch/mailman/listinfo/smallwiki



From renggli at gmail.com  Thu Apr 14 19:27:11 2011
From: renggli at gmail.com (Lukas Renggli)
Date: Thu, 14 Apr 2011 19:27:11 +0200
Subject: RSS filter by tags
In-Reply-To: <FB15D57A-5250-474E-8F48-0ACAE989FF9D@hartl.name>
References: <FC30D948-C33C-41F0-BB28-324FCC2D1417@hartl.name>
	<FB15D57A-5250-474E-8F48-0ACAE989FF9D@hartl.name>
Message-ID: <BANLkTi=SCOENCUZSYKC6YoEa8rwag7+c+w@mail.gmail.com>

Hi Norbert,

I merged your change into the latest blog package. I made it also work
for comments and fixed a bug related to the limit of posts.

Lukas

On 14 April 2011 15:31, Norbert Hartl <norbert at hartl.name> wrote:
> Er,
>
> and if you use the changeset you can add a paramter tags to your feed url.
>
> http://norbert.hartl.name/blog/?view=PBEntriesRssView&tags=smalltalk
>
> gives all posts that are tagged with smalltalk. The parameter can take multiple tags separated by comma (,)
>
> Norbert
> Am 14.04.2011 um 15:17 schrieb Norbert Hartl:
>
>> Some time ago I changed PBEntriesRSSView to be able to filter entries by tags. It is useful if you are subscribed to e.g. planet smalltalk. This way only posts that are tagged properly will be included. But I forgot to drop a note about it.
>>
>> Today I've been asked about it and that made me do a small changeset in case somebody wants to know. I'm not sure if this should be included in default pier hence the changeset.
>>
>> Hope you like it,
>>
>> Norbert
>>
>> <pier-rss-filter.1.cs>_______________________________________________
>> Magritte, Pier and Related Tools ...
>> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>
>
> _______________________________________________
> Magritte, Pier and Related Tools ...
> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>



-- 
Lukas Renggli
www.lukas-renggli.ch

From norbert at hartl.name  Thu Apr 14 19:35:16 2011
From: norbert at hartl.name (Norbert Hartl)
Date: Thu, 14 Apr 2011 19:35:16 +0200
Subject: RSS filter by tags
In-Reply-To: <BANLkTi=SCOENCUZSYKC6YoEa8rwag7+c+w@mail.gmail.com>
References: <FC30D948-C33C-41F0-BB28-324FCC2D1417@hartl.name>
	<FB15D57A-5250-474E-8F48-0ACAE989FF9D@hartl.name>
	<BANLkTi=SCOENCUZSYKC6YoEa8rwag7+c+w@mail.gmail.com>
Message-ID: <0E03FE81-E0AD-4C77-AF73-2D3DD8594C1C@hartl.name>

Simply great!

thanks,

Norbert

Am 14.04.2011 um 19:27 schrieb Lukas Renggli:

> Hi Norbert,
> 
> I merged your change into the latest blog package. I made it also work
> for comments and fixed a bug related to the limit of posts.
> 
> Lukas
> 
> On 14 April 2011 15:31, Norbert Hartl <norbert at hartl.name> wrote:
>> Er,
>> 
>> and if you use the changeset you can add a paramter tags to your feed url.
>> 
>> http://norbert.hartl.name/blog/?view=PBEntriesRssView&tags=smalltalk
>> 
>> gives all posts that are tagged with smalltalk. The parameter can take multiple tags separated by comma (,)
>> 
>> Norbert
>> Am 14.04.2011 um 15:17 schrieb Norbert Hartl:
>> 
>>> Some time ago I changed PBEntriesRSSView to be able to filter entries by tags. It is useful if you are subscribed to e.g. planet smalltalk. This way only posts that are tagged properly will be included. But I forgot to drop a note about it.
>>> 
>>> Today I've been asked about it and that made me do a small changeset in case somebody wants to know. I'm not sure if this should be included in default pier hence the changeset.
>>> 
>>> Hope you like it,
>>> 
>>> Norbert
>>> 
>>> <pier-rss-filter.1.cs>_______________________________________________
>>> Magritte, Pier and Related Tools ...
>>> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>> 
>> 
>> _______________________________________________
>> Magritte, Pier and Related Tools ...
>> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>> 
> 
> 
> 
> -- 
> Lukas Renggli
> www.lukas-renggli.ch
> _______________________________________________
> Magritte, Pier and Related Tools ...
> https://www.iam.unibe.ch/mailman/listinfo/smallwiki



From xekoukou at gmail.com  Mon Apr 18 14:47:36 2011
From: xekoukou at gmail.com (xekoukou)
Date: Mon, 18 Apr 2011 05:47:36 -0700 (PDT)
Subject: Independent Contractor to develop Site
Message-ID: <1303130856994-3457411.post@n4.nabble.com>



I am looking to hire an independent contractor to develop a site for a to be
non profit Organization.

Things that will be considered as a prerequisitive:

Good knowledge of Pier. :)
The ability to find and use a good Database, for example Gemstone. Open
source Databases will be prefered but
the site will rely heavily on matrix computations which should give the
result in real time. So, It is important that the database connects to a C
programm for example for the computations. I dont know yet where it will be
hosted. If it will be hosted in my own server, I think that the use of Cuda,
cublas would be prefered but I am open to suggetions.

One of the work that will have to be done is to put the Wikipedia
encyclopedia english dump into the database.

   This site will be supposed to be an improvement of Wikipedia that will
have some of the properties of Knol.google.com and much more. It is intended
to be a non profit organization that will not use advertisements, so the
initial budget is very limited until the site becomes known.

I havent decided yet if i will use Pier as a more obvious option is to use
Mediawiki which looks like it will be cheaper.
   
I believe that many of you would find the concept very interesting but I
cant say more right now.

--
View this message in context: http://forum.world.st/Independent-Contractor-to-develop-Site-tp3457411p3457411.html
Sent from the Magritte, Pier and Related Tools mailing list archive at Nabble.com.

From davorin.rusevljan at gmail.com  Thu Apr 21 23:19:36 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Thu, 21 Apr 2011 23:19:36 +0200
Subject: Export - Import in latest Pier 2 Jenkins Build
Message-ID: <BANLkTi=8-irORspZLZaMPv9fvWsgBF7Dfg@mail.gmail.com>

Hello,

I have downloaded latest one click Pier2 from
jenkins.lukas-renggli.ch, but when I click on export/imporrt component
browser gets:

Internal Server Error

ConnectionTimedOut: Data receive timed out.

Interestingly there is no walkback in the image.

I must be doing something very stupid I guess :)

Davorin Rusevljan
http://www.cloud208.com/


On Thu, Mar 24, 2011 at 8:53 PM, Apostolis Xekoukoulotakis
<xekoukou at gmail.com> wrote:
> Hello fellows,
> I would like to ask you if there is any documentation on creating new addons
> for the pier systems, apart from the code.
> Also if there is documentation for the already existant addons, for all the
> addons.
> Is the list?http://source.lukas-renggli.ch/pieraddons/?complete or are there
> more?
> If there is no documentation what are the differences in creating components
> for pier than for a general seaside web site.
> Do i have to learn magritte?
> --
>
> This message and any attachments (the "message") are confidential, intended
> solely for the addressee(s), and may contain legally privileged information.
> Any unauthorised use or dissemination is prohibited. E-mails are susceptible
> to alteration.
> I shall not be liable for the message if altered, changed or
> falsified.
>
> Sincerely yours,
>
>      Apostolis Xekoukoulotakis
>
> _______________________________________________
> Magritte, Pier and Related Tools ...
> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>


From davorin.rusevljan at gmail.com  Thu Apr 21 23:27:43 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Thu, 21 Apr 2011 23:27:43 +0200
Subject: Export - Import in latest Pier 2 Jenkins Build
In-Reply-To: <BANLkTi=8-irORspZLZaMPv9fvWsgBF7Dfg@mail.gmail.com>
References: <BANLkTi=8-irORspZLZaMPv9fvWsgBF7Dfg@mail.gmail.com>
Message-ID: <BANLkTine0P-Z8tMBJizpPoiC-cL3HLzxNw@mail.gmail.com>

On Thu, Apr 21, 2011 at 11:19 PM, Davorin Rusevljan
<davorin.rusevljan at gmail.com> wrote:
> Hello,
>
> I have downloaded latest one click Pier2 from
> jenkins.lukas-renggli.ch

that is:

Build #498 (2011.04.21 18:28:14)

Davorin Rusevljan
http://www.cloud208.com/

From chaetal at gmail.com  Fri Apr 22 06:20:18 2011
From: chaetal at gmail.com (Dennis Schetinin)
Date: Fri, 22 Apr 2011 08:20:18 +0400
Subject: Export - Import in latest Pier 2 Jenkins Build
In-Reply-To: <BANLkTine0P-Z8tMBJizpPoiC-cL3HLzxNw@mail.gmail.com>
References: <BANLkTi=8-irORspZLZaMPv9fvWsgBF7Dfg@mail.gmail.com>
	<BANLkTine0P-Z8tMBJizpPoiC-cL3HLzxNw@mail.gmail.com>
Message-ID: <BANLkTimVrcGZ6AJCGufkDeNsC-YsTE-c5A@mail.gmail.com>

Pier-Pharo-Persistency-lr.19 from http://source.lukas-renggli.ch/pier2 works
for me.

2011/4/22 Davorin Rusevljan <davorin.rusevljan at gmail.com>

> On Thu, Apr 21, 2011 at 11:19 PM, Davorin Rusevljan
> <davorin.rusevljan at gmail.com> wrote:
> > Hello,
> >
> > I have downloaded latest one click Pier2 from
> > jenkins.lukas-renggli.ch
>
> that is:
>
> Build #498 (2011.04.21 18:28:14)
>
> Davorin Rusevljan
> http://www.cloud208.com/
> _______________________________________________
> Magritte, Pier and Related Tools ...
> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>



-- 
Dennis Schetinin
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://www.iam.unibe.ch/pipermail/smallwiki/attachments/20110422/c4f0333c/attachment-0001.html>

From davorin.rusevljan at gmail.com  Fri Apr 22 09:11:40 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Fri, 22 Apr 2011 09:11:40 +0200
Subject: Export - Import in latest Pier 2 Jenkins Build
In-Reply-To: <BANLkTimVrcGZ6AJCGufkDeNsC-YsTE-c5A@mail.gmail.com>
References: <BANLkTi=8-irORspZLZaMPv9fvWsgBF7Dfg@mail.gmail.com>
	<BANLkTine0P-Z8tMBJizpPoiC-cL3HLzxNw@mail.gmail.com>
	<BANLkTimVrcGZ6AJCGufkDeNsC-YsTE-c5A@mail.gmail.com>
Message-ID: <BANLkTin+FLDJoUWD6Mr1X0+kLO=_SJKNzw@mail.gmail.com>

On Fri, Apr 22, 2011 at 6:20 AM, Dennis Schetinin <chaetal at gmail.com> wrote:
> Pier-Pharo-Persistency-lr.19 from?http://source.lukas-renggli.ch/pier2 works
> for me.

That is the one I have in one click image.

I have putted self halt in: PRExportImportWidget>>export:

and it seems that I do not land in this method when button Export is clicked?

now I am pretty certain that I am doing something trivially wrong.

Davorin Rusevljan
http://www.cloud208.com/


From davorin.rusevljan at gmail.com  Fri Apr 22 10:16:34 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Fri, 22 Apr 2011 10:16:34 +0200
Subject: Export - Import in latest Pier 2 Jenkins Build
In-Reply-To: <BANLkTin+FLDJoUWD6Mr1X0+kLO=_SJKNzw@mail.gmail.com>
References: <BANLkTi=8-irORspZLZaMPv9fvWsgBF7Dfg@mail.gmail.com>
	<BANLkTine0P-Z8tMBJizpPoiC-cL3HLzxNw@mail.gmail.com>
	<BANLkTimVrcGZ6AJCGufkDeNsC-YsTE-c5A@mail.gmail.com>
	<BANLkTin+FLDJoUWD6Mr1X0+kLO=_SJKNzw@mail.gmail.com>
Message-ID: <BANLkTikDBz8LyjHF4S77PetjEuOkSAb2wg@mail.gmail.com>

Hmm could it be something related to handling of multipart forms in
comanche? If I change form to be regular one, and buttons to just
buttons instead of submitButton, export: method does fire up, and I do
get download of pier.obj. (importing still groaks though).

in one click image there is:

Seaside-Adaptors-Comanche-pmm68

Davorin Rusevljan
http://www.cloud208.com/

From renggli at gmail.com  Fri Apr 22 10:46:54 2011
From: renggli at gmail.com (Lukas Renggli)
Date: Fri, 22 Apr 2011 10:46:54 +0200
Subject: Export - Import in latest Pier 2 Jenkins Build
In-Reply-To: <BANLkTikDBz8LyjHF4S77PetjEuOkSAb2wg@mail.gmail.com>
References: <BANLkTi=8-irORspZLZaMPv9fvWsgBF7Dfg@mail.gmail.com>
	<BANLkTine0P-Z8tMBJizpPoiC-cL3HLzxNw@mail.gmail.com>
	<BANLkTimVrcGZ6AJCGufkDeNsC-YsTE-c5A@mail.gmail.com>
	<BANLkTin+FLDJoUWD6Mr1X0+kLO=_SJKNzw@mail.gmail.com>
	<BANLkTikDBz8LyjHF4S77PetjEuOkSAb2wg@mail.gmail.com>
Message-ID: <BANLkTinH+6LNoGMdya0YMrq+iiOsqe2wHQ@mail.gmail.com>

This seems to be an issue in Seaside with multipart post requests.
This can be verified with the functional test suite of Seaside at
<http://localhost:8080/tests/functional/WAInputPostMultipartFunctionalTest>.

I will try to figure out what happens here. Thanks for letting us know.

Cheers,
Lukas

On 22 April 2011 10:16, Davorin Rusevljan <davorin.rusevljan at gmail.com> wrote:
> Hmm could it be something related to handling of multipart forms in
> comanche? If I change form to be regular one, and buttons to just
> buttons instead of submitButton, export: method does fire up, and I do
> get download of pier.obj. (importing still groaks though).
>
> in one click image there is:
>
> Seaside-Adaptors-Comanche-pmm68
>
> Davorin Rusevljan
> http://www.cloud208.com/
> _______________________________________________
> Magritte, Pier and Related Tools ...
> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>



-- 
Lukas Renggli
www.lukas-renggli.ch

From renggli at gmail.com  Fri Apr 22 11:09:40 2011
From: renggli at gmail.com (Lukas Renggli)
Date: Fri, 22 Apr 2011 11:09:40 +0200
Subject: Export - Import in latest Pier 2 Jenkins Build
In-Reply-To: <BANLkTinH+6LNoGMdya0YMrq+iiOsqe2wHQ@mail.gmail.com>
References: <BANLkTi=8-irORspZLZaMPv9fvWsgBF7Dfg@mail.gmail.com>
	<BANLkTine0P-Z8tMBJizpPoiC-cL3HLzxNw@mail.gmail.com>
	<BANLkTimVrcGZ6AJCGufkDeNsC-YsTE-c5A@mail.gmail.com>
	<BANLkTin+FLDJoUWD6Mr1X0+kLO=_SJKNzw@mail.gmail.com>
	<BANLkTikDBz8LyjHF4S77PetjEuOkSAb2wg@mail.gmail.com>
	<BANLkTinH+6LNoGMdya0YMrq+iiOsqe2wHQ@mail.gmail.com>
Message-ID: <BANLkTikxEAtr0JPEHueCAqpvR2+5oUQHWg@mail.gmail.com>

The problem seems to come from this change:
<http://code.google.com/p/seaside/issues/detail?id=648>.

Reverting that code solves the problem:

Gofer new
   squeaksource: 'KomHttpServer';
   package: 'KomHttpServerLight';
   load

On 22 April 2011 10:46, Lukas Renggli <renggli at gmail.com> wrote:
> This seems to be an issue in Seaside with multipart post requests.
> This can be verified with the functional test suite of Seaside at
> <http://localhost:8080/tests/functional/WAInputPostMultipartFunctionalTest>.
>
> I will try to figure out what happens here. Thanks for letting us know.
>
> Cheers,
> Lukas
>
> On 22 April 2011 10:16, Davorin Rusevljan <davorin.rusevljan at gmail.com> wrote:
>> Hmm could it be something related to handling of multipart forms in
>> comanche? If I change form to be regular one, and buttons to just
>> buttons instead of submitButton, export: method does fire up, and I do
>> get download of pier.obj. (importing still groaks though).
>>
>> in one click image there is:
>>
>> Seaside-Adaptors-Comanche-pmm68
>>
>> Davorin Rusevljan
>> http://www.cloud208.com/
>> _______________________________________________
>> Magritte, Pier and Related Tools ...
>> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>>
>
>
>
> --
> Lukas Renggli
> www.lukas-renggli.ch
>



-- 
Lukas Renggli
www.lukas-renggli.ch

From davorin.rusevljan at gmail.com  Fri Apr 22 12:11:01 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Fri, 22 Apr 2011 12:11:01 +0200
Subject: Export - Import in latest Pier 2 Jenkins Build
In-Reply-To: <BANLkTikxEAtr0JPEHueCAqpvR2+5oUQHWg@mail.gmail.com>
References: <BANLkTi=8-irORspZLZaMPv9fvWsgBF7Dfg@mail.gmail.com>
	<BANLkTine0P-Z8tMBJizpPoiC-cL3HLzxNw@mail.gmail.com>
	<BANLkTimVrcGZ6AJCGufkDeNsC-YsTE-c5A@mail.gmail.com>
	<BANLkTin+FLDJoUWD6Mr1X0+kLO=_SJKNzw@mail.gmail.com>
	<BANLkTikDBz8LyjHF4S77PetjEuOkSAb2wg@mail.gmail.com>
	<BANLkTinH+6LNoGMdya0YMrq+iiOsqe2wHQ@mail.gmail.com>
	<BANLkTikxEAtr0JPEHueCAqpvR2+5oUQHWg@mail.gmail.com>
Message-ID: <BANLkTi=vL62wuTz2X2XJugYWct0uNLXvZw@mail.gmail.com>

On Fri, Apr 22, 2011 at 11:09 AM, Lukas Renggli <renggli at gmail.com> wrote:
> The problem seems to come from this change:
> <http://code.google.com/p/seaside/issues/detail?id=648>.

I guess this had something to do with REST support, be damned ;)

> Reverting that code solves the problem:
>
> Gofer new
> ? squeaksource: 'KomHttpServer';
> ? package: 'KomHttpServerLight';
> ? load

Ok, import/export now works, thanks Lukas!

Will this change be incorporated in #499 build of Pier?

Thanks once again,

Davorin


From renggli at gmail.com  Fri Apr 22 12:55:19 2011
From: renggli at gmail.com (Lukas Renggli)
Date: Fri, 22 Apr 2011 12:55:19 +0200
Subject: Export - Import in latest Pier 2 Jenkins Build
In-Reply-To: <BANLkTi=vL62wuTz2X2XJugYWct0uNLXvZw@mail.gmail.com>
References: <BANLkTi=8-irORspZLZaMPv9fvWsgBF7Dfg@mail.gmail.com>
	<BANLkTine0P-Z8tMBJizpPoiC-cL3HLzxNw@mail.gmail.com>
	<BANLkTimVrcGZ6AJCGufkDeNsC-YsTE-c5A@mail.gmail.com>
	<BANLkTin+FLDJoUWD6Mr1X0+kLO=_SJKNzw@mail.gmail.com>
	<BANLkTikDBz8LyjHF4S77PetjEuOkSAb2wg@mail.gmail.com>
	<BANLkTinH+6LNoGMdya0YMrq+iiOsqe2wHQ@mail.gmail.com>
	<BANLkTikxEAtr0JPEHueCAqpvR2+5oUQHWg@mail.gmail.com>
	<BANLkTi=vL62wuTz2X2XJugYWct0uNLXvZw@mail.gmail.com>
Message-ID: <BANLkTimJJCci3MKULZ=9MF4VT2pKagAWoA@mail.gmail.com>

>> The problem seems to come from this change:
>> <http://code.google.com/p/seaside/issues/detail?id=648>.
>
> I guess this had something to do with REST support, be damned ;)

No, I don't think so.

> Will this change be incorporated in #499 build of Pier?

Yes, this should be part of the most recent builds.

Lukas

-- 
Lukas Renggli
www.lukas-renggli.ch

From davorin.rusevljan at gmail.com  Fri Apr 22 23:20:13 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Fri, 22 Apr 2011 23:20:13 +0200
Subject: More Import woves
Message-ID: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>

Well,

I am afraid I have some more import related problems. Now I am
attempting to import conents of 1.1 based pier to 1.2

There were few problesm with missing packages, that I have resolved,
and now import completes. Problem is that after import any atempt to
access pier from web browser results with walkback as below:

Davorin Rusevljan


22 April 2011 11:14:08 pm

VM: Win32 - IX86 - 5.1 - Croquet Closure Cog VM [CoInterpreter VMMaker-oscog.51]
Image: Pharo1.2.1 [Latest update: #12345]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir C:\temp\pier2\Pier.app\Contents\Resources
Trusted Dir C:\temp\pier2\Pier.app\Contents\Resources\VsiTe
Untrusted Dir C:\Documents and Settings\VsiTe\My Documents\My Squeak

UndefinedObject(Object)>>doesNotUnderstand: #includes:
	Receiver: nil
	Arguments and temporary variables:
		aMessage: 	includes: nil
		exception: 	MessageNotUnderstood: receiver of "includes:" is nil
		resumeValue: 	nil
	Receiver's instance variables:
nil

PUGroup>>includes:
	Receiver: a PUGroup[1038352384] name: 'admin'
	Arguments and temporary variables:
		anUser: 	nil
	Receiver's instance variables:
		properties: 	nil
		name: 	'admin'
		comment: 	a Set(a PUUser[209190912] name: 'kolumbina' a
PUUser[30146560] name: '...etc...
		users: 	nil

PUSecurity>>hasPermission:for:
	Receiver: a PUSecurity[382730240]
	Arguments and temporary variables:
		aPermission: 	View
		aUser: 	nil
	Receiver's instance variables:
		properties: 	nil
		decorated: 	a PRPage[7077888] name: 'pier'
		owner: 	a PUUser[30146560] name: 'admin'
		ownerPermissions: 	a Set(Add Component Add Blog View Add File Remove
Change Owne...etc...
		group: 	a PUGroup[1038352384] name: 'admin'
		groupPermissions: 	a Set(Add Component Add Blog View Add File Remove
Change Owne...etc...
		otherPermissions: 	a Set(View)

[:permission | self hasPermission: permission for: aContext user] in
PUSecurity>>isAllowedCommand:in:
	Receiver: a PUSecurity[382730240]
	Arguments and temporary variables:
		aContext: 	View
		permission: 	a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
	Receiver's instance variables:
		properties: 	nil
		decorated: 	a PRPage[7077888] name: 'pier'
		owner: 	a PUUser[30146560] name: 'admin'
		ownerPermissions: 	a Set(Add Component Add Blog View Add File Remove
Change Owne...etc...
		group: 	a PUGroup[1038352384] name: 'admin'
		groupPermissions: 	a Set(Add Component Add Blog View Add File Remove
Change Owne...etc...
		otherPermissions: 	a Set(View)

[:each |
(aBlock value: each)
		ifTrue: [^ true].
	nil] in Array(Collection)>>anySatisfy:
	Receiver: an Array(View)
	Arguments and temporary variables:
		aBlock: 	View
		each: 	[:permission | self hasPermission: permission for: aContext user]
	Receiver's instance variables:
an Array(View)

Array(SequenceableCollection)>>do:
	Receiver: an Array(View)
	Arguments and temporary variables:
		aBlock: 	[:each |
(aBlock value: each)
		ifTrue: [^ true].
	nil]
		index: 	1
		indexLimiT: 	1
	Receiver's instance variables:
an Array(View)

Array(Collection)>>anySatisfy:
	Receiver: an Array(View)
	Arguments and temporary variables:
		aBlock: 	[:permission | self hasPermission: permission for: aContext user]
	Receiver's instance variables:
an Array(View)

PUSecurity>>isAllowedCommand:in:
	Receiver: a PUSecurity[382730240]
	Arguments and temporary variables:
		aCommandClass: 	PRViewCommand
		aContext: 	a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
	Receiver's instance variables:
		properties: 	nil
		decorated: 	a PRPage[7077888] name: 'pier'
		owner: 	a PUUser[30146560] name: 'admin'
		ownerPermissions: 	a Set(Add Component Add Blog View Add File Remove
Change Owne...etc...
		group: 	a PUGroup[1038352384] name: 'admin'
		groupPermissions: 	a Set(Add Component Add Blog View Add File Remove
Change Owne...etc...
		otherPermissions: 	a Set(View)

[:each | each isAllowedCommand: aCommandClass in: aContext] in
PRPage(PRStructure)>>isAllowedCommand:in:
	Receiver: a PRPage[7077888] name: 'pier'
	Arguments and temporary variables:
		aCommandClass: 	a PUSecurity[382730240]
		aContext: 	PRViewCommand
		each: 	a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
	Receiver's instance variables:
		properties: 	a Dictionary(#documents->a Dictionary()
#hideFromMenus->false #loca...etc...
		decorations: 	an Array(a PUSecurity[382730240] a PRChildren[757071872])
		parent: 	nil
		name: 	'pier'
		title: 	'Cloud208.com'
		tags: 	#()
		document: 	a PRDocument[657195008]

[:each | (aBlock value: each)
		ifFalse: [^ false]] in Array(Collection)>>allSatisfy:
	Receiver: an Array(a PUSecurity[382730240] a PRChildren[757071872])
	Arguments and temporary variables:
		aBlock: 	a PUSecurity[382730240]
		each: 	[:each | each isAllowedCommand: aCommandClass in: aContext]
	Receiver's instance variables:
an Array(a PUSecurity[382730240] a PRChildren[757071872])

Array(SequenceableCollection)>>do:
	Receiver: an Array(a PUSecurity[382730240] a PRChildren[757071872])
	Arguments and temporary variables:
		aBlock: 	[:each | (aBlock value: each)
		ifFalse: [^ false]]
		index: 	1
		indexLimiT: 	2
	Receiver's instance variables:
an Array(a PUSecurity[382730240] a PRChildren[757071872])

Array(Collection)>>allSatisfy:
	Receiver: an Array(a PUSecurity[382730240] a PRChildren[757071872])
	Arguments and temporary variables:
		aBlock: 	[:each | each isAllowedCommand: aCommandClass in: aContext]
	Receiver's instance variables:
an Array(a PUSecurity[382730240] a PRChildren[757071872])

PRPage(PRStructure)>>isAllowedCommand:in:
	Receiver: a PRPage[7077888] name: 'pier'
	Arguments and temporary variables:
		aCommandClass: 	PRViewCommand
		aContext: 	a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
	Receiver's instance variables:
		properties: 	a Dictionary(#documents->a Dictionary()
#hideFromMenus->false #loca...etc...
		decorations: 	an Array(a PUSecurity[382730240] a PRChildren[757071872])
		parent: 	nil
		name: 	'pier'
		title: 	'Cloud208.com'
		tags: 	#()
		document: 	a PRDocument[657195008]

PRPage(PRStructure)>>isValidCommand:in:
	Receiver: a PRPage[7077888] name: 'pier'
	Arguments and temporary variables:
		aCommandClass: 	PRViewCommand
		aContext: 	a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
	Receiver's instance variables:
		properties: 	a Dictionary(#documents->a Dictionary()
#hideFromMenus->false #loca...etc...
		decorations: 	an Array(a PUSecurity[382730240] a PRChildren[757071872])
		parent: 	nil
		name: 	'pier'
		title: 	'Cloud208.com'
		tags: 	#()
		document: 	a PRDocument[657195008]

PRViewCommand class(PRCommand class)>>isValidIn:
	Receiver: PRViewCommand
	Arguments and temporary variables:
		aContext: 	a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
	Receiver's instance variables:
		superclass: 	PRCommand
		methodDict: 	a
MethodDictionary(#asComponent->(PRViewCommand>>#asComponent "a
Co...etc...
		format: 	144
		instanceVariables: 	nil
		organization: 	('*pier-seaside-accessing' defaultViewComponentClass
label render...etc...
		subclasses: 	nil
		name: 	#PRViewCommand
		classPool: 	nil
		sharedPools: 	nil
		environment: 	a SystemDictionary(lots of globals)
		category: 	#'Pier-Model-Command'
		traitComposition: 	{}
		localSelectors: 	nil

PRContext>>isValidCommand:
	Receiver: a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
	Arguments and temporary variables:
		aCommandClass: 	PRViewCommand
	Receiver's instance variables:
		properties: 	a Dictionary(#user->nil )
		kernel: 	a PRKernel[532414464] name: 'pier'
		structure: 	a PRPage[7077888] name: 'pier'
		command: 	a PRViewCommand[435159040]

PRContext>>isValid
	Receiver: a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
	Arguments and temporary variables:

	Receiver's instance variables:
		properties: 	a Dictionary(#user->nil )
		kernel: 	a PRKernel[532414464] name: 'pier'
		structure: 	a PRPage[7077888] name: 'pier'
		command: 	a PRViewCommand[435159040]

PRPierFrame>>context:
	Receiver: a PRPierFrame
	Arguments and temporary variables:
		aContext: 	a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
	Receiver's instance variables:
		decoration: 	a WAValueHolder contents: a WAToolDecoration
		context: 	a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
		children: 	nil

PRPierFrame>>initialRequest:
	Receiver: a PRPierFrame
	Arguments and temporary variables:
		aRequest: 	a WARequest method: GET uri: / version: HTTP/1.1
		structure: 	a PRPage[7077888] name: 'pier'
		following: 	a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
	Receiver's instance variables:
		decoration: 	a WAValueHolder contents: a WAToolDecoration
		context: 	a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
		children: 	nil

WAInitialRequestVisitor>>visitPresenter:
	Receiver: a WAInitialRequestVisitor
	Arguments and temporary variables:
		aPresenter: 	a PRPierFrame
	Receiver's instance variables:
		request: 	a WARequest method: GET uri: / version: HTTP/1.1

WAInitialRequestVisitor(WAPainterVisitor)>>visitComponent:
	Receiver: a WAInitialRequestVisitor
	Arguments and temporary variables:
		aComponent: 	a PRPierFrame
	Receiver's instance variables:
		request: 	a WARequest method: GET uri: / version: HTTP/1.1

PRPierFrame(WAComponent)>>accept:
	Receiver: a PRPierFrame
	Arguments and temporary variables:
		aVisitor: 	a WAInitialRequestVisitor
	Receiver's instance variables:
		decoration: 	a WAValueHolder contents: a WAToolDecoration
		context: 	a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
		children: 	nil

WAInitialRequestVisitor(WAVisitor)>>visit:
	Receiver: a WAInitialRequestVisitor
	Arguments and temporary variables:
		anObject: 	a PRPierFrame
	Receiver's instance variables:
		request: 	a WARequest method: GET uri: / version: HTTP/1.1

WAAllPresenterGuide(WAPresenterGuide)>>visitPainter:
	Receiver: a WAAllPresenterGuide
	Arguments and temporary variables:
		aPainter: 	a PRPierFrame
	Receiver's instance variables:
		client: 	a WAInitialRequestVisitor

WAAllPresenterGuide(WAPainterVisitor)>>visitPresenter:
	Receiver: a WAAllPresenterGuide
	Arguments and temporary variables:
		aPresenter: 	a PRPierFrame
	Receiver's instance variables:
		client: 	a WAInitialRequestVisitor

WAAllPresenterGuide(WAVisiblePresenterGuide)>>visitPresenter:
	Receiver: a WAAllPresenterGuide
	Arguments and temporary variables:
		aPresenter: 	a PRPierFrame
	Receiver's instance variables:
		client: 	a WAInitialRequestVisitor

WAAllPresenterGuide(WAPainterVisitor)>>visitComponent:
	Receiver: a WAAllPresenterGuide
	Arguments and temporary variables:
		aComponent: 	a PRPierFrame
	Receiver's instance variables:
		client: 	a WAInitialRequestVisitor

PRPierFrame(WAComponent)>>accept:
	Receiver: a PRPierFrame
	Arguments and temporary variables:
		aVisitor: 	a WAAllPresenterGuide
	Receiver's instance variables:
		decoration: 	a WAValueHolder contents: a WAToolDecoration
		context: 	a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
		children: 	nil

WAAllPresenterGuide(WAVisiblePresenterGuide)>>visitDecoration:
	Receiver: a WAAllPresenterGuide
	Arguments and temporary variables:
		aDecoration: 	a WAToolDecoration
	Receiver's instance variables:
		client: 	a WAInitialRequestVisitor

WAToolDecoration(WADecoration)>>accept:
	Receiver: a WAToolDecoration
	Arguments and temporary variables:
		aVisitor: 	a WAAllPresenterGuide
	Receiver's instance variables:
		next: 	a WAValueHolder contents: a PRPierFrame
		plugins: 	an OrderedCollection(a WANewSessionToolPlugin a
WAConfigureToolPlugin ...etc...
		showHalos: 	a WAValueHolder contents: false
		halos: 	an IdentityDictionary()

WAAllPresenterGuide(WAPainterVisitor)>>visitDecorationsOfComponent:
	Receiver: a WAAllPresenterGuide
	Arguments and temporary variables:
		aComponent: 	a PRPierFrame
	Receiver's instance variables:
		client: 	a WAInitialRequestVisitor

PRPierFrame(WAComponent)>>acceptDecorated:
	Receiver: a PRPierFrame
	Arguments and temporary variables:
		aVisitor: 	a WAAllPresenterGuide
	Receiver's instance variables:
		decoration: 	a WAValueHolder contents: a WAToolDecoration
		context: 	a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
		children: 	nil

[super acceptDecorated: aPainterVisitor] in PRPierFrame>>acceptDecorated:
	Receiver: a PRPierFrame
	Arguments and temporary variables:
		aPainterVisitor: 	a WAAllPresenterGuide
	Receiver's instance variables:
		decoration: 	a WAValueHolder contents: a WAToolDecoration
		context: 	a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
		children: 	nil

BlockClosure>>on:do:
	Receiver: [super acceptDecorated: aPainterVisitor]
	Arguments and temporary variables:
		exception: 	PRCurrentContext
		handlerAction: 	[:notification | notification resume: anObject]
		handlerActive: 	true
	Receiver's instance variables:
		outerContext: 	PRPierFrame>>acceptDecorated:
		startpc: 	27
		numArgs: 	0

PRCurrentContext class>>use:during:
	Receiver: PRCurrentContext
	Arguments and temporary variables:
		anObject: 	a PRPierFrame
		aBlock: 	[super acceptDecorated: aPainterVisitor]
	Receiver's instance variables:
		superclass: 	GRNotification
		methodDict: 	a MethodDictionary()
		format: 	140
		instanceVariables: 	nil
		organization: 	('as yet unclassified')

		subclasses: 	nil
		name: 	#PRCurrentContext
		classPool: 	nil
		sharedPools: 	nil
		environment: 	a SystemDictionary(lots of globals)
		category: 	#'Pier-Model-Kernel'
		traitComposition: 	{}
		localSelectors: 	nil

PRPierFrame>>withContextDo:
	Receiver: a PRPierFrame
	Arguments and temporary variables:
		aBlock: 	[super acceptDecorated: aPainterVisitor]
	Receiver's instance variables:
		decoration: 	a WAValueHolder contents: a WAToolDecoration
		context: 	a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
		children: 	nil

PRPierFrame>>acceptDecorated:
	Receiver: a PRPierFrame
	Arguments and temporary variables:
		aPainterVisitor: 	a WAAllPresenterGuide
	Receiver's instance variables:
		decoration: 	a WAValueHolder contents: a WAToolDecoration
		context: 	a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
		children: 	nil

WAAllPresenterGuide(WAPresenterGuide)>>visit:
	Receiver: a WAAllPresenterGuide
	Arguments and temporary variables:
		aPainter: 	a PRPierFrame
	Receiver's instance variables:
		client: 	a WAInitialRequestVisitor

WAAllPresenterGuide(WAVisitor)>>start:
	Receiver: a WAAllPresenterGuide
	Arguments and temporary variables:
		anObject: 	a PRPierFrame
	Receiver's instance variables:
		client: 	a WAInitialRequestVisitor


--- The full stack ---
UndefinedObject(Object)>>doesNotUnderstand: #includes:
PUGroup>>includes:
PUSecurity>>hasPermission:for:
[:permission | self hasPermission: permission for: aContext user] in
PUSecurity>>isAllowedCommand:in:
[:each |
(aBlock value: each)
		ifTrue: [^ true].
	nil] in Array(Collection)>>anySatisfy:
Array(SequenceableCollection)>>do:
Array(Collection)>>anySatisfy:
PUSecurity>>isAllowedCommand:in:
[:each | each isAllowedCommand: aCommandClass in: aContext] in
PRPage(PRStructure)>>isAllowedCommand:in:
[:each | (aBlock value: each)
		ifFalse: [^ false]] in Array(Collection)>>allSatisfy:
Array(SequenceableCollection)>>do:
Array(Collection)>>allSatisfy:
PRPage(PRStructure)>>isAllowedCommand:in:
PRPage(PRStructure)>>isValidCommand:in:
PRViewCommand class(PRCommand class)>>isValidIn:
PRContext>>isValidCommand:
PRContext>>isValid
PRPierFrame>>context:
PRPierFrame>>initialRequest:
WAInitialRequestVisitor>>visitPresenter:
WAInitialRequestVisitor(WAPainterVisitor)>>visitComponent:
PRPierFrame(WAComponent)>>accept:
WAInitialRequestVisitor(WAVisitor)>>visit:
WAAllPresenterGuide(WAPresenterGuide)>>visitPainter:
WAAllPresenterGuide(WAPainterVisitor)>>visitPresenter:
WAAllPresenterGuide(WAVisiblePresenterGuide)>>visitPresenter:
WAAllPresenterGuide(WAPainterVisitor)>>visitComponent:
PRPierFrame(WAComponent)>>accept:
WAAllPresenterGuide(WAVisiblePresenterGuide)>>visitDecoration:
WAToolDecoration(WADecoration)>>accept:
WAAllPresenterGuide(WAPainterVisitor)>>visitDecorationsOfComponent:
PRPierFrame(WAComponent)>>acceptDecorated:
[super acceptDecorated: aPainterVisitor] in PRPierFrame>>acceptDecorated:
BlockClosure>>on:do:
PRCurrentContext class>>use:during:
PRPierFrame>>withContextDo:
PRPierFrame>>acceptDecorated:
WAAllPresenterGuide(WAPresenterGuide)>>visit:
WAAllPresenterGuide(WAVisitor)>>start:
 - - - - - - - - - - - - - - -
			- - - - - - - - - - - - - - - - - -
WARenderLoopMain>>prepareRoot:
WARenderLoopMain>>start
WASession>>start
[^ self start] in WASession>>handleFiltered:
WAMergedRequestFields>>at:ifAbsent:
WASession>>handleFiltered:
WAMutualExclusionFilter(WARequestFilter)>>handleFiltered:
[super handleFiltered: aRequestContext] in
WAMutualExclusionFilter>>handleFiltered:
BlockClosure>>ensure:
[owner := process.
	aBlock
		ensure: [owner := nil]] in WAMutex>>critical:
[caught := true.
	self wait.
	blockValue := mutuallyExcludedBlock value] in Semaphore>>critical:
BlockClosure>>ensure:
Semaphore>>critical:
WAMutex>>critical:
WAMutualExclusionFilter>>handleFiltered:
[self filter handleFiltered: aRequestContext] in
WASession(WARequestHandler)>>handle:
BlockClosure>>on:do:
WACurrentRequestContext class(WADynamicVariable class)>>use:during:
[WACurrentRequestContext use: self during: aBlock] in
WARequestContext>>push:while:
BlockClosure>>ensure:
WARequestContext>>push:while:
WASession(WARequestHandler)>>handle:
WAApplication(WARegistry)>>dispatch:to:
WAApplication(WARegistry)>>handle:registering:
WAApplication>>handleDefault:
WAApplication(WARegistry)>>handleFiltered:
WAApplication>>handleFiltered:
WAExceptionFilter(WARequestFilter)>>handleFiltered:
[super handleFiltered: aRequestContext] in WAExceptionFilter>>handleFiltered:
BlockClosure>>on:do:
WAWalkbackErrorHandler(WAExceptionHandler)>>handleExceptionsDuring:
WAWalkbackErrorHandler class(WAExceptionHandler
class)>>handleExceptionsDuring:context:
WAExceptionFilter>>handleFiltered:
[self filter handleFiltered: aRequestContext] in
WAApplication(WARequestHandler)>>handle:
BlockClosure>>on:do:
WACurrentRequestContext class(WADynamicVariable class)>>use:during:
[WACurrentRequestContext use: self during: aBlock] in
WARequestContext>>push:while:
BlockClosure>>ensure:
WARequestContext>>push:while:
WAApplication(WARequestHandler)>>handle:
WADispatcher>>handleFiltered:named:
WADispatcher>>handleDefault:
WADispatcher>>handleFiltered:
[self filter handleFiltered: aRequestContext] in
WADispatcher(WARequestHandler)>>handle:
BlockClosure>>on:do:
WACurrentRequestContext class(WADynamicVariable class)>>use:during:
[WACurrentRequestContext use: self during: aBlock] in
WARequestContext>>push:while:
BlockClosure>>ensure:
WARequestContext>>push:while:
WADispatcher(WARequestHandler)>>handle:
[self requestHandler handle: aRequestContext] in
WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
BlockClosure>>on:do:
WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
WAComancheAdaptor(WAServerAdaptor)>>handle:
[self handle: context;
		 responseFrom: context] in WAComancheAdaptor(WAServerAdaptor)>>process:
BlockClosure>>ensure:
WAComancheAdaptor(WAServerAdaptor)>>process:
WAComancheAdaptor>>processHttpRequest:
HttpService>>processHttpRequest:
[self target processHttpRequest: request] in HttpAdaptor>>dispatchRequest:
BlockClosure>>on:do:
HttpService>>handleDispatchErrorsIn:
HttpAdaptor>>dispatchRequest:
[[[request := self readRequest]
		on: Error
		do: [:ex | continue := false].
	continue
		ifTrue: [response := self dispatchRequest: request.
			self
				addConnectionHeaders: response
				request: request
				count: count.
			(self writeResponse: response for: request)
				ifFalse: [^ self].
			count := count + 1.
			continue := response isPersistent
						and: [count < limit]].
	continue] whileTrue.
	nil] in HttpAdaptor>>beginConversation
BlockClosure>>ensure:
HttpAdaptor>>beginConversation
HttpAdaptor class>>readAndWriteTo:service:
HttpAdaptor class>>readAndWriteToSocket:service:
HttpService>>serve:
[self serve: aSocket] in HttpService(TcpService)>>value:
[self value.
	Processor terminateActive] in BlockClosure>>newProcess

From renggli at gmail.com  Sat Apr 23 08:48:36 2011
From: renggli at gmail.com (Lukas Renggli)
Date: Sat, 23 Apr 2011 08:48:36 +0200
Subject: More Import woves
In-Reply-To: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>
References: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>
Message-ID: <BANLkTimdtiUM5ebX8LtvrXL+Bt2Gt+nBkg@mail.gmail.com>

Strange that your groups end up with the 'users' list set to 'nil'.
Then again, it is kind of expected, because the objects between Pier
1.1 and 1.2 changed and the binary serialization mechanism isn't smart
and only supposed to work between two identical images/versions.

So you need to manually fix all PUGroup instances by setting the
inst-var 'users' to 'Set new' if nil. Try something along:

     PUGroup allInstancesDo: [ :g |
         g users isNil
             ifTrue: [ g instVarNamed: 'users' put: Set new ] ]

There might be other problems like this. And don't forget to check
your permissions afterwards, likely they are messed up.

Lukas

On 22 April 2011 23:20, Davorin Rusevljan <davorin.rusevljan at gmail.com> wrote:
> Well,
>
> I am afraid I have some more import related problems. Now I am
> attempting to import conents of 1.1 based pier to 1.2
>
> There were few problesm with missing packages, that I have resolved,
> and now import completes. Problem is that after import any atempt to
> access pier from web browser results with walkback as below:
>
> Davorin Rusevljan
>
>
> 22 April 2011 11:14:08 pm
>
> VM: Win32 - IX86 - 5.1 - Croquet Closure Cog VM [CoInterpreter VMMaker-oscog.51]
> Image: Pharo1.2.1 [Latest update: #12345]
>
> SecurityManager state:
> Restricted: false
> FileAccess: true
> SocketAccess: true
> Working Dir C:\temp\pier2\Pier.app\Contents\Resources
> Trusted Dir C:\temp\pier2\Pier.app\Contents\Resources\VsiTe
> Untrusted Dir C:\Documents and Settings\VsiTe\My Documents\My Squeak
>
> UndefinedObject(Object)>>doesNotUnderstand: #includes:
> ? ? ? ?Receiver: nil
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aMessage: ? ? ? includes: nil
> ? ? ? ? ? ? ? ?exception: ? ? ?MessageNotUnderstood: receiver of "includes:" is nil
> ? ? ? ? ? ? ? ?resumeValue: ? ?nil
> ? ? ? ?Receiver's instance variables:
> nil
>
> PUGroup>>includes:
> ? ? ? ?Receiver: a PUGroup[1038352384] name: 'admin'
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?anUser: ? ? ? ? nil
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?properties: ? ? nil
> ? ? ? ? ? ? ? ?name: ? 'admin'
> ? ? ? ? ? ? ? ?comment: ? ? ? ?a Set(a PUUser[209190912] name: 'kolumbina' a
> PUUser[30146560] name: '...etc...
> ? ? ? ? ? ? ? ?users: ?nil
>
> PUSecurity>>hasPermission:for:
> ? ? ? ?Receiver: a PUSecurity[382730240]
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aPermission: ? ?View
> ? ? ? ? ? ? ? ?aUser: ?nil
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?properties: ? ? nil
> ? ? ? ? ? ? ? ?decorated: ? ? ?a PRPage[7077888] name: 'pier'
> ? ? ? ? ? ? ? ?owner: ?a PUUser[30146560] name: 'admin'
> ? ? ? ? ? ? ? ?ownerPermissions: ? ? ? a Set(Add Component Add Blog View Add File Remove
> Change Owne...etc...
> ? ? ? ? ? ? ? ?group: ?a PUGroup[1038352384] name: 'admin'
> ? ? ? ? ? ? ? ?groupPermissions: ? ? ? a Set(Add Component Add Blog View Add File Remove
> Change Owne...etc...
> ? ? ? ? ? ? ? ?otherPermissions: ? ? ? a Set(View)
>
> [:permission | self hasPermission: permission for: aContext user] in
> PUSecurity>>isAllowedCommand:in:
> ? ? ? ?Receiver: a PUSecurity[382730240]
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aContext: ? ? ? View
> ? ? ? ? ? ? ? ?permission: ? ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?properties: ? ? nil
> ? ? ? ? ? ? ? ?decorated: ? ? ?a PRPage[7077888] name: 'pier'
> ? ? ? ? ? ? ? ?owner: ?a PUUser[30146560] name: 'admin'
> ? ? ? ? ? ? ? ?ownerPermissions: ? ? ? a Set(Add Component Add Blog View Add File Remove
> Change Owne...etc...
> ? ? ? ? ? ? ? ?group: ?a PUGroup[1038352384] name: 'admin'
> ? ? ? ? ? ? ? ?groupPermissions: ? ? ? a Set(Add Component Add Blog View Add File Remove
> Change Owne...etc...
> ? ? ? ? ? ? ? ?otherPermissions: ? ? ? a Set(View)
>
> [:each |
> (aBlock value: each)
> ? ? ? ? ? ? ? ?ifTrue: [^ true].
> ? ? ? ?nil] in Array(Collection)>>anySatisfy:
> ? ? ? ?Receiver: an Array(View)
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? View
> ? ? ? ? ? ? ? ?each: ? [:permission | self hasPermission: permission for: aContext user]
> ? ? ? ?Receiver's instance variables:
> an Array(View)
>
> Array(SequenceableCollection)>>do:
> ? ? ? ?Receiver: an Array(View)
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? [:each |
> (aBlock value: each)
> ? ? ? ? ? ? ? ?ifTrue: [^ true].
> ? ? ? ?nil]
> ? ? ? ? ? ? ? ?index: ?1
> ? ? ? ? ? ? ? ?indexLimiT: ? ? 1
> ? ? ? ?Receiver's instance variables:
> an Array(View)
>
> Array(Collection)>>anySatisfy:
> ? ? ? ?Receiver: an Array(View)
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? [:permission | self hasPermission: permission for: aContext user]
> ? ? ? ?Receiver's instance variables:
> an Array(View)
>
> PUSecurity>>isAllowedCommand:in:
> ? ? ? ?Receiver: a PUSecurity[382730240]
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aCommandClass: ?PRViewCommand
> ? ? ? ? ? ? ? ?aContext: ? ? ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?properties: ? ? nil
> ? ? ? ? ? ? ? ?decorated: ? ? ?a PRPage[7077888] name: 'pier'
> ? ? ? ? ? ? ? ?owner: ?a PUUser[30146560] name: 'admin'
> ? ? ? ? ? ? ? ?ownerPermissions: ? ? ? a Set(Add Component Add Blog View Add File Remove
> Change Owne...etc...
> ? ? ? ? ? ? ? ?group: ?a PUGroup[1038352384] name: 'admin'
> ? ? ? ? ? ? ? ?groupPermissions: ? ? ? a Set(Add Component Add Blog View Add File Remove
> Change Owne...etc...
> ? ? ? ? ? ? ? ?otherPermissions: ? ? ? a Set(View)
>
> [:each | each isAllowedCommand: aCommandClass in: aContext] in
> PRPage(PRStructure)>>isAllowedCommand:in:
> ? ? ? ?Receiver: a PRPage[7077888] name: 'pier'
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aCommandClass: ?a PUSecurity[382730240]
> ? ? ? ? ? ? ? ?aContext: ? ? ? PRViewCommand
> ? ? ? ? ? ? ? ?each: ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?properties: ? ? a Dictionary(#documents->a Dictionary()
> #hideFromMenus->false #loca...etc...
> ? ? ? ? ? ? ? ?decorations: ? ?an Array(a PUSecurity[382730240] a PRChildren[757071872])
> ? ? ? ? ? ? ? ?parent: ? ? ? ? nil
> ? ? ? ? ? ? ? ?name: ? 'pier'
> ? ? ? ? ? ? ? ?title: ?'Cloud208.com'
> ? ? ? ? ? ? ? ?tags: ? #()
> ? ? ? ? ? ? ? ?document: ? ? ? a PRDocument[657195008]
>
> [:each | (aBlock value: each)
> ? ? ? ? ? ? ? ?ifFalse: [^ false]] in Array(Collection)>>allSatisfy:
> ? ? ? ?Receiver: an Array(a PUSecurity[382730240] a PRChildren[757071872])
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? a PUSecurity[382730240]
> ? ? ? ? ? ? ? ?each: ? [:each | each isAllowedCommand: aCommandClass in: aContext]
> ? ? ? ?Receiver's instance variables:
> an Array(a PUSecurity[382730240] a PRChildren[757071872])
>
> Array(SequenceableCollection)>>do:
> ? ? ? ?Receiver: an Array(a PUSecurity[382730240] a PRChildren[757071872])
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? [:each | (aBlock value: each)
> ? ? ? ? ? ? ? ?ifFalse: [^ false]]
> ? ? ? ? ? ? ? ?index: ?1
> ? ? ? ? ? ? ? ?indexLimiT: ? ? 2
> ? ? ? ?Receiver's instance variables:
> an Array(a PUSecurity[382730240] a PRChildren[757071872])
>
> Array(Collection)>>allSatisfy:
> ? ? ? ?Receiver: an Array(a PUSecurity[382730240] a PRChildren[757071872])
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? [:each | each isAllowedCommand: aCommandClass in: aContext]
> ? ? ? ?Receiver's instance variables:
> an Array(a PUSecurity[382730240] a PRChildren[757071872])
>
> PRPage(PRStructure)>>isAllowedCommand:in:
> ? ? ? ?Receiver: a PRPage[7077888] name: 'pier'
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aCommandClass: ?PRViewCommand
> ? ? ? ? ? ? ? ?aContext: ? ? ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?properties: ? ? a Dictionary(#documents->a Dictionary()
> #hideFromMenus->false #loca...etc...
> ? ? ? ? ? ? ? ?decorations: ? ?an Array(a PUSecurity[382730240] a PRChildren[757071872])
> ? ? ? ? ? ? ? ?parent: ? ? ? ? nil
> ? ? ? ? ? ? ? ?name: ? 'pier'
> ? ? ? ? ? ? ? ?title: ?'Cloud208.com'
> ? ? ? ? ? ? ? ?tags: ? #()
> ? ? ? ? ? ? ? ?document: ? ? ? a PRDocument[657195008]
>
> PRPage(PRStructure)>>isValidCommand:in:
> ? ? ? ?Receiver: a PRPage[7077888] name: 'pier'
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aCommandClass: ?PRViewCommand
> ? ? ? ? ? ? ? ?aContext: ? ? ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?properties: ? ? a Dictionary(#documents->a Dictionary()
> #hideFromMenus->false #loca...etc...
> ? ? ? ? ? ? ? ?decorations: ? ?an Array(a PUSecurity[382730240] a PRChildren[757071872])
> ? ? ? ? ? ? ? ?parent: ? ? ? ? nil
> ? ? ? ? ? ? ? ?name: ? 'pier'
> ? ? ? ? ? ? ? ?title: ?'Cloud208.com'
> ? ? ? ? ? ? ? ?tags: ? #()
> ? ? ? ? ? ? ? ?document: ? ? ? a PRDocument[657195008]
>
> PRViewCommand class(PRCommand class)>>isValidIn:
> ? ? ? ?Receiver: PRViewCommand
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aContext: ? ? ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?superclass: ? ? PRCommand
> ? ? ? ? ? ? ? ?methodDict: ? ? a
> MethodDictionary(#asComponent->(PRViewCommand>>#asComponent "a
> Co...etc...
> ? ? ? ? ? ? ? ?format: ? ? ? ? 144
> ? ? ? ? ? ? ? ?instanceVariables: ? ? ?nil
> ? ? ? ? ? ? ? ?organization: ? ('*pier-seaside-accessing' defaultViewComponentClass
> label render...etc...
> ? ? ? ? ? ? ? ?subclasses: ? ? nil
> ? ? ? ? ? ? ? ?name: ? #PRViewCommand
> ? ? ? ? ? ? ? ?classPool: ? ? ?nil
> ? ? ? ? ? ? ? ?sharedPools: ? ?nil
> ? ? ? ? ? ? ? ?environment: ? ?a SystemDictionary(lots of globals)
> ? ? ? ? ? ? ? ?category: ? ? ? #'Pier-Model-Command'
> ? ? ? ? ? ? ? ?traitComposition: ? ? ? {}
> ? ? ? ? ? ? ? ?localSelectors: ? ? ? ? nil
>
> PRContext>>isValidCommand:
> ? ? ? ?Receiver: a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aCommandClass: ?PRViewCommand
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?properties: ? ? a Dictionary(#user->nil )
> ? ? ? ? ? ? ? ?kernel: ? ? ? ? a PRKernel[532414464] name: 'pier'
> ? ? ? ? ? ? ? ?structure: ? ? ?a PRPage[7077888] name: 'pier'
> ? ? ? ? ? ? ? ?command: ? ? ? ?a PRViewCommand[435159040]
>
> PRContext>>isValid
> ? ? ? ?Receiver: a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
> ? ? ? ?Arguments and temporary variables:
>
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?properties: ? ? a Dictionary(#user->nil )
> ? ? ? ? ? ? ? ?kernel: ? ? ? ? a PRKernel[532414464] name: 'pier'
> ? ? ? ? ? ? ? ?structure: ? ? ?a PRPage[7077888] name: 'pier'
> ? ? ? ? ? ? ? ?command: ? ? ? ?a PRViewCommand[435159040]
>
> PRPierFrame>>context:
> ? ? ? ?Receiver: a PRPierFrame
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aContext: ? ? ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
> ? ? ? ? ? ? ? ?children: ? ? ? nil
>
> PRPierFrame>>initialRequest:
> ? ? ? ?Receiver: a PRPierFrame
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aRequest: ? ? ? a WARequest method: GET uri: / version: HTTP/1.1
> ? ? ? ? ? ? ? ?structure: ? ? ?a PRPage[7077888] name: 'pier'
> ? ? ? ? ? ? ? ?following: ? ? ?a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
> ? ? ? ? ? ? ? ?children: ? ? ? nil
>
> WAInitialRequestVisitor>>visitPresenter:
> ? ? ? ?Receiver: a WAInitialRequestVisitor
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aPresenter: ? ? a PRPierFrame
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?request: ? ? ? ?a WARequest method: GET uri: / version: HTTP/1.1
>
> WAInitialRequestVisitor(WAPainterVisitor)>>visitComponent:
> ? ? ? ?Receiver: a WAInitialRequestVisitor
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aComponent: ? ? a PRPierFrame
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?request: ? ? ? ?a WARequest method: GET uri: / version: HTTP/1.1
>
> PRPierFrame(WAComponent)>>accept:
> ? ? ? ?Receiver: a PRPierFrame
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aVisitor: ? ? ? a WAInitialRequestVisitor
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
> ? ? ? ? ? ? ? ?children: ? ? ? nil
>
> WAInitialRequestVisitor(WAVisitor)>>visit:
> ? ? ? ?Receiver: a WAInitialRequestVisitor
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?anObject: ? ? ? a PRPierFrame
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?request: ? ? ? ?a WARequest method: GET uri: / version: HTTP/1.1
>
> WAAllPresenterGuide(WAPresenterGuide)>>visitPainter:
> ? ? ? ?Receiver: a WAAllPresenterGuide
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aPainter: ? ? ? a PRPierFrame
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>
> WAAllPresenterGuide(WAPainterVisitor)>>visitPresenter:
> ? ? ? ?Receiver: a WAAllPresenterGuide
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aPresenter: ? ? a PRPierFrame
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>
> WAAllPresenterGuide(WAVisiblePresenterGuide)>>visitPresenter:
> ? ? ? ?Receiver: a WAAllPresenterGuide
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aPresenter: ? ? a PRPierFrame
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>
> WAAllPresenterGuide(WAPainterVisitor)>>visitComponent:
> ? ? ? ?Receiver: a WAAllPresenterGuide
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aComponent: ? ? a PRPierFrame
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>
> PRPierFrame(WAComponent)>>accept:
> ? ? ? ?Receiver: a PRPierFrame
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aVisitor: ? ? ? a WAAllPresenterGuide
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
> ? ? ? ? ? ? ? ?children: ? ? ? nil
>
> WAAllPresenterGuide(WAVisiblePresenterGuide)>>visitDecoration:
> ? ? ? ?Receiver: a WAAllPresenterGuide
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aDecoration: ? ?a WAToolDecoration
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>
> WAToolDecoration(WADecoration)>>accept:
> ? ? ? ?Receiver: a WAToolDecoration
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aVisitor: ? ? ? a WAAllPresenterGuide
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?next: ? a WAValueHolder contents: a PRPierFrame
> ? ? ? ? ? ? ? ?plugins: ? ? ? ?an OrderedCollection(a WANewSessionToolPlugin a
> WAConfigureToolPlugin ...etc...
> ? ? ? ? ? ? ? ?showHalos: ? ? ?a WAValueHolder contents: false
> ? ? ? ? ? ? ? ?halos: ?an IdentityDictionary()
>
> WAAllPresenterGuide(WAPainterVisitor)>>visitDecorationsOfComponent:
> ? ? ? ?Receiver: a WAAllPresenterGuide
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aComponent: ? ? a PRPierFrame
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>
> PRPierFrame(WAComponent)>>acceptDecorated:
> ? ? ? ?Receiver: a PRPierFrame
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aVisitor: ? ? ? a WAAllPresenterGuide
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
> ? ? ? ? ? ? ? ?children: ? ? ? nil
>
> [super acceptDecorated: aPainterVisitor] in PRPierFrame>>acceptDecorated:
> ? ? ? ?Receiver: a PRPierFrame
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aPainterVisitor: ? ? ? ?a WAAllPresenterGuide
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
> ? ? ? ? ? ? ? ?children: ? ? ? nil
>
> BlockClosure>>on:do:
> ? ? ? ?Receiver: [super acceptDecorated: aPainterVisitor]
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?exception: ? ? ?PRCurrentContext
> ? ? ? ? ? ? ? ?handlerAction: ?[:notification | notification resume: anObject]
> ? ? ? ? ? ? ? ?handlerActive: ?true
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?outerContext: ? PRPierFrame>>acceptDecorated:
> ? ? ? ? ? ? ? ?startpc: ? ? ? ?27
> ? ? ? ? ? ? ? ?numArgs: ? ? ? ?0
>
> PRCurrentContext class>>use:during:
> ? ? ? ?Receiver: PRCurrentContext
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?anObject: ? ? ? a PRPierFrame
> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? [super acceptDecorated: aPainterVisitor]
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?superclass: ? ? GRNotification
> ? ? ? ? ? ? ? ?methodDict: ? ? a MethodDictionary()
> ? ? ? ? ? ? ? ?format: ? ? ? ? 140
> ? ? ? ? ? ? ? ?instanceVariables: ? ? ?nil
> ? ? ? ? ? ? ? ?organization: ? ('as yet unclassified')
>
> ? ? ? ? ? ? ? ?subclasses: ? ? nil
> ? ? ? ? ? ? ? ?name: ? #PRCurrentContext
> ? ? ? ? ? ? ? ?classPool: ? ? ?nil
> ? ? ? ? ? ? ? ?sharedPools: ? ?nil
> ? ? ? ? ? ? ? ?environment: ? ?a SystemDictionary(lots of globals)
> ? ? ? ? ? ? ? ?category: ? ? ? #'Pier-Model-Kernel'
> ? ? ? ? ? ? ? ?traitComposition: ? ? ? {}
> ? ? ? ? ? ? ? ?localSelectors: ? ? ? ? nil
>
> PRPierFrame>>withContextDo:
> ? ? ? ?Receiver: a PRPierFrame
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? [super acceptDecorated: aPainterVisitor]
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
> ? ? ? ? ? ? ? ?children: ? ? ? nil
>
> PRPierFrame>>acceptDecorated:
> ? ? ? ?Receiver: a PRPierFrame
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aPainterVisitor: ? ? ? ?a WAAllPresenterGuide
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
> ? ? ? ? ? ? ? ?children: ? ? ? nil
>
> WAAllPresenterGuide(WAPresenterGuide)>>visit:
> ? ? ? ?Receiver: a WAAllPresenterGuide
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?aPainter: ? ? ? a PRPierFrame
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>
> WAAllPresenterGuide(WAVisitor)>>start:
> ? ? ? ?Receiver: a WAAllPresenterGuide
> ? ? ? ?Arguments and temporary variables:
> ? ? ? ? ? ? ? ?anObject: ? ? ? a PRPierFrame
> ? ? ? ?Receiver's instance variables:
> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>
>
> --- The full stack ---
> UndefinedObject(Object)>>doesNotUnderstand: #includes:
> PUGroup>>includes:
> PUSecurity>>hasPermission:for:
> [:permission | self hasPermission: permission for: aContext user] in
> PUSecurity>>isAllowedCommand:in:
> [:each |
> (aBlock value: each)
> ? ? ? ? ? ? ? ?ifTrue: [^ true].
> ? ? ? ?nil] in Array(Collection)>>anySatisfy:
> Array(SequenceableCollection)>>do:
> Array(Collection)>>anySatisfy:
> PUSecurity>>isAllowedCommand:in:
> [:each | each isAllowedCommand: aCommandClass in: aContext] in
> PRPage(PRStructure)>>isAllowedCommand:in:
> [:each | (aBlock value: each)
> ? ? ? ? ? ? ? ?ifFalse: [^ false]] in Array(Collection)>>allSatisfy:
> Array(SequenceableCollection)>>do:
> Array(Collection)>>allSatisfy:
> PRPage(PRStructure)>>isAllowedCommand:in:
> PRPage(PRStructure)>>isValidCommand:in:
> PRViewCommand class(PRCommand class)>>isValidIn:
> PRContext>>isValidCommand:
> PRContext>>isValid
> PRPierFrame>>context:
> PRPierFrame>>initialRequest:
> WAInitialRequestVisitor>>visitPresenter:
> WAInitialRequestVisitor(WAPainterVisitor)>>visitComponent:
> PRPierFrame(WAComponent)>>accept:
> WAInitialRequestVisitor(WAVisitor)>>visit:
> WAAllPresenterGuide(WAPresenterGuide)>>visitPainter:
> WAAllPresenterGuide(WAPainterVisitor)>>visitPresenter:
> WAAllPresenterGuide(WAVisiblePresenterGuide)>>visitPresenter:
> WAAllPresenterGuide(WAPainterVisitor)>>visitComponent:
> PRPierFrame(WAComponent)>>accept:
> WAAllPresenterGuide(WAVisiblePresenterGuide)>>visitDecoration:
> WAToolDecoration(WADecoration)>>accept:
> WAAllPresenterGuide(WAPainterVisitor)>>visitDecorationsOfComponent:
> PRPierFrame(WAComponent)>>acceptDecorated:
> [super acceptDecorated: aPainterVisitor] in PRPierFrame>>acceptDecorated:
> BlockClosure>>on:do:
> PRCurrentContext class>>use:during:
> PRPierFrame>>withContextDo:
> PRPierFrame>>acceptDecorated:
> WAAllPresenterGuide(WAPresenterGuide)>>visit:
> WAAllPresenterGuide(WAVisitor)>>start:
> ?- - - - - - - - - - - - - - -
> ? ? ? ? ? ? ? ? ? ? ? ?- - - - - - - - - - - - - - - - - -
> WARenderLoopMain>>prepareRoot:
> WARenderLoopMain>>start
> WASession>>start
> [^ self start] in WASession>>handleFiltered:
> WAMergedRequestFields>>at:ifAbsent:
> WASession>>handleFiltered:
> WAMutualExclusionFilter(WARequestFilter)>>handleFiltered:
> [super handleFiltered: aRequestContext] in
> WAMutualExclusionFilter>>handleFiltered:
> BlockClosure>>ensure:
> [owner := process.
> ? ? ? ?aBlock
> ? ? ? ? ? ? ? ?ensure: [owner := nil]] in WAMutex>>critical:
> [caught := true.
> ? ? ? ?self wait.
> ? ? ? ?blockValue := mutuallyExcludedBlock value] in Semaphore>>critical:
> BlockClosure>>ensure:
> Semaphore>>critical:
> WAMutex>>critical:
> WAMutualExclusionFilter>>handleFiltered:
> [self filter handleFiltered: aRequestContext] in
> WASession(WARequestHandler)>>handle:
> BlockClosure>>on:do:
> WACurrentRequestContext class(WADynamicVariable class)>>use:during:
> [WACurrentRequestContext use: self during: aBlock] in
> WARequestContext>>push:while:
> BlockClosure>>ensure:
> WARequestContext>>push:while:
> WASession(WARequestHandler)>>handle:
> WAApplication(WARegistry)>>dispatch:to:
> WAApplication(WARegistry)>>handle:registering:
> WAApplication>>handleDefault:
> WAApplication(WARegistry)>>handleFiltered:
> WAApplication>>handleFiltered:
> WAExceptionFilter(WARequestFilter)>>handleFiltered:
> [super handleFiltered: aRequestContext] in WAExceptionFilter>>handleFiltered:
> BlockClosure>>on:do:
> WAWalkbackErrorHandler(WAExceptionHandler)>>handleExceptionsDuring:
> WAWalkbackErrorHandler class(WAExceptionHandler
> class)>>handleExceptionsDuring:context:
> WAExceptionFilter>>handleFiltered:
> [self filter handleFiltered: aRequestContext] in
> WAApplication(WARequestHandler)>>handle:
> BlockClosure>>on:do:
> WACurrentRequestContext class(WADynamicVariable class)>>use:during:
> [WACurrentRequestContext use: self during: aBlock] in
> WARequestContext>>push:while:
> BlockClosure>>ensure:
> WARequestContext>>push:while:
> WAApplication(WARequestHandler)>>handle:
> WADispatcher>>handleFiltered:named:
> WADispatcher>>handleDefault:
> WADispatcher>>handleFiltered:
> [self filter handleFiltered: aRequestContext] in
> WADispatcher(WARequestHandler)>>handle:
> BlockClosure>>on:do:
> WACurrentRequestContext class(WADynamicVariable class)>>use:during:
> [WACurrentRequestContext use: self during: aBlock] in
> WARequestContext>>push:while:
> BlockClosure>>ensure:
> WARequestContext>>push:while:
> WADispatcher(WARequestHandler)>>handle:
> [self requestHandler handle: aRequestContext] in
> WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
> BlockClosure>>on:do:
> WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
> WAComancheAdaptor(WAServerAdaptor)>>handle:
> [self handle: context;
> ? ? ? ? ? ? ? ? responseFrom: context] in WAComancheAdaptor(WAServerAdaptor)>>process:
> BlockClosure>>ensure:
> WAComancheAdaptor(WAServerAdaptor)>>process:
> WAComancheAdaptor>>processHttpRequest:
> HttpService>>processHttpRequest:
> [self target processHttpRequest: request] in HttpAdaptor>>dispatchRequest:
> BlockClosure>>on:do:
> HttpService>>handleDispatchErrorsIn:
> HttpAdaptor>>dispatchRequest:
> [[[request := self readRequest]
> ? ? ? ? ? ? ? ?on: Error
> ? ? ? ? ? ? ? ?do: [:ex | continue := false].
> ? ? ? ?continue
> ? ? ? ? ? ? ? ?ifTrue: [response := self dispatchRequest: request.
> ? ? ? ? ? ? ? ? ? ? ? ?self
> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?addConnectionHeaders: response
> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?request: request
> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?count: count.
> ? ? ? ? ? ? ? ? ? ? ? ?(self writeResponse: response for: request)
> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?ifFalse: [^ self].
> ? ? ? ? ? ? ? ? ? ? ? ?count := count + 1.
> ? ? ? ? ? ? ? ? ? ? ? ?continue := response isPersistent
> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?and: [count < limit]].
> ? ? ? ?continue] whileTrue.
> ? ? ? ?nil] in HttpAdaptor>>beginConversation
> BlockClosure>>ensure:
> HttpAdaptor>>beginConversation
> HttpAdaptor class>>readAndWriteTo:service:
> HttpAdaptor class>>readAndWriteToSocket:service:
> HttpService>>serve:
> [self serve: aSocket] in HttpService(TcpService)>>value:
> [self value.
> ? ? ? ?Processor terminateActive] in BlockClosure>>newProcess
> _______________________________________________
> Magritte, Pier and Related Tools ...
> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>



-- 
Lukas Renggli
www.lukas-renggli.ch


From davorin.rusevljan at gmail.com  Sat Apr 23 10:35:00 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Sat, 23 Apr 2011 10:35:00 +0200
Subject: More Import woves
In-Reply-To: <BANLkTimdtiUM5ebX8LtvrXL+Bt2Gt+nBkg@mail.gmail.com>
References: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>
	<BANLkTimdtiUM5ebX8LtvrXL+Bt2Gt+nBkg@mail.gmail.com>
Message-ID: <BANLkTiksKLjf00eHg5RcwTzmgfFg=j9eYA@mail.gmail.com>

On Sat, Apr 23, 2011 at 8:48 AM, Lukas Renggli <renggli at gmail.com> wrote:
> Strange that your groups end up with the 'users' list set to 'nil'.
> Then again, it is kind of expected, because the objects between Pier
> 1.1 and 1.2 changed and the binary serialization mechanism isn't smart
> and only supposed to work between two identical images/versions.
>
> So you need to manually fix all PUGroup instances by setting the
> inst-var 'users' to 'Set new' if nil. Try something along:
>
> ? ? PUGroup allInstancesDo: [ :g |
> ? ? ? ? g users isNil
> ? ? ? ? ? ? ifTrue: [ g instVarNamed: 'users' put: Set new ] ]

That moved me one step further.

Next obstacle is PRInternalLink which in embeded inst var has empty
Array, while and this array gets returned by isEmbeded, and then gets
used as boolean in some block.

Did semantics of embeded inst var changed from 1.1 to 1.2? (and what
are they now :)

Maybe I could alter all instances of PRLink that have empty arrays as
embeded to be set to false, and other ones to true, but I do not know
if this is going to break something else since original embeded
informaton would be lost.

Thanks,

Davorin

Thanks


>
> There might be other problems like this. And don't forget to check
> your permissions afterwards, likely they are messed up.
>
> Lukas
>
> On 22 April 2011 23:20, Davorin Rusevljan <davorin.rusevljan at gmail.com> wrote:
>> Well,
>>
>> I am afraid I have some more import related problems. Now I am
>> attempting to import conents of 1.1 based pier to 1.2
>>
>> There were few problesm with missing packages, that I have resolved,
>> and now import completes. Problem is that after import any atempt to
>> access pier from web browser results with walkback as below:
>>
>> Davorin Rusevljan
>>
>>
>> 22 April 2011 11:14:08 pm
>>
>> VM: Win32 - IX86 - 5.1 - Croquet Closure Cog VM [CoInterpreter VMMaker-oscog.51]
>> Image: Pharo1.2.1 [Latest update: #12345]
>>
>> SecurityManager state:
>> Restricted: false
>> FileAccess: true
>> SocketAccess: true
>> Working Dir C:\temp\pier2\Pier.app\Contents\Resources
>> Trusted Dir C:\temp\pier2\Pier.app\Contents\Resources\VsiTe
>> Untrusted Dir C:\Documents and Settings\VsiTe\My Documents\My Squeak
>>
>> UndefinedObject(Object)>>doesNotUnderstand: #includes:
>> ? ? ? ?Receiver: nil
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aMessage: ? ? ? includes: nil
>> ? ? ? ? ? ? ? ?exception: ? ? ?MessageNotUnderstood: receiver of "includes:" is nil
>> ? ? ? ? ? ? ? ?resumeValue: ? ?nil
>> ? ? ? ?Receiver's instance variables:
>> nil
>>
>> PUGroup>>includes:
>> ? ? ? ?Receiver: a PUGroup[1038352384] name: 'admin'
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?anUser: ? ? ? ? nil
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?properties: ? ? nil
>> ? ? ? ? ? ? ? ?name: ? 'admin'
>> ? ? ? ? ? ? ? ?comment: ? ? ? ?a Set(a PUUser[209190912] name: 'kolumbina' a
>> PUUser[30146560] name: '...etc...
>> ? ? ? ? ? ? ? ?users: ?nil
>>
>> PUSecurity>>hasPermission:for:
>> ? ? ? ?Receiver: a PUSecurity[382730240]
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aPermission: ? ?View
>> ? ? ? ? ? ? ? ?aUser: ?nil
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?properties: ? ? nil
>> ? ? ? ? ? ? ? ?decorated: ? ? ?a PRPage[7077888] name: 'pier'
>> ? ? ? ? ? ? ? ?owner: ?a PUUser[30146560] name: 'admin'
>> ? ? ? ? ? ? ? ?ownerPermissions: ? ? ? a Set(Add Component Add Blog View Add File Remove
>> Change Owne...etc...
>> ? ? ? ? ? ? ? ?group: ?a PUGroup[1038352384] name: 'admin'
>> ? ? ? ? ? ? ? ?groupPermissions: ? ? ? a Set(Add Component Add Blog View Add File Remove
>> Change Owne...etc...
>> ? ? ? ? ? ? ? ?otherPermissions: ? ? ? a Set(View)
>>
>> [:permission | self hasPermission: permission for: aContext user] in
>> PUSecurity>>isAllowedCommand:in:
>> ? ? ? ?Receiver: a PUSecurity[382730240]
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aContext: ? ? ? View
>> ? ? ? ? ? ? ? ?permission: ? ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?properties: ? ? nil
>> ? ? ? ? ? ? ? ?decorated: ? ? ?a PRPage[7077888] name: 'pier'
>> ? ? ? ? ? ? ? ?owner: ?a PUUser[30146560] name: 'admin'
>> ? ? ? ? ? ? ? ?ownerPermissions: ? ? ? a Set(Add Component Add Blog View Add File Remove
>> Change Owne...etc...
>> ? ? ? ? ? ? ? ?group: ?a PUGroup[1038352384] name: 'admin'
>> ? ? ? ? ? ? ? ?groupPermissions: ? ? ? a Set(Add Component Add Blog View Add File Remove
>> Change Owne...etc...
>> ? ? ? ? ? ? ? ?otherPermissions: ? ? ? a Set(View)
>>
>> [:each |
>> (aBlock value: each)
>> ? ? ? ? ? ? ? ?ifTrue: [^ true].
>> ? ? ? ?nil] in Array(Collection)>>anySatisfy:
>> ? ? ? ?Receiver: an Array(View)
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? View
>> ? ? ? ? ? ? ? ?each: ? [:permission | self hasPermission: permission for: aContext user]
>> ? ? ? ?Receiver's instance variables:
>> an Array(View)
>>
>> Array(SequenceableCollection)>>do:
>> ? ? ? ?Receiver: an Array(View)
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? [:each |
>> (aBlock value: each)
>> ? ? ? ? ? ? ? ?ifTrue: [^ true].
>> ? ? ? ?nil]
>> ? ? ? ? ? ? ? ?index: ?1
>> ? ? ? ? ? ? ? ?indexLimiT: ? ? 1
>> ? ? ? ?Receiver's instance variables:
>> an Array(View)
>>
>> Array(Collection)>>anySatisfy:
>> ? ? ? ?Receiver: an Array(View)
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? [:permission | self hasPermission: permission for: aContext user]
>> ? ? ? ?Receiver's instance variables:
>> an Array(View)
>>
>> PUSecurity>>isAllowedCommand:in:
>> ? ? ? ?Receiver: a PUSecurity[382730240]
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aCommandClass: ?PRViewCommand
>> ? ? ? ? ? ? ? ?aContext: ? ? ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?properties: ? ? nil
>> ? ? ? ? ? ? ? ?decorated: ? ? ?a PRPage[7077888] name: 'pier'
>> ? ? ? ? ? ? ? ?owner: ?a PUUser[30146560] name: 'admin'
>> ? ? ? ? ? ? ? ?ownerPermissions: ? ? ? a Set(Add Component Add Blog View Add File Remove
>> Change Owne...etc...
>> ? ? ? ? ? ? ? ?group: ?a PUGroup[1038352384] name: 'admin'
>> ? ? ? ? ? ? ? ?groupPermissions: ? ? ? a Set(Add Component Add Blog View Add File Remove
>> Change Owne...etc...
>> ? ? ? ? ? ? ? ?otherPermissions: ? ? ? a Set(View)
>>
>> [:each | each isAllowedCommand: aCommandClass in: aContext] in
>> PRPage(PRStructure)>>isAllowedCommand:in:
>> ? ? ? ?Receiver: a PRPage[7077888] name: 'pier'
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aCommandClass: ?a PUSecurity[382730240]
>> ? ? ? ? ? ? ? ?aContext: ? ? ? PRViewCommand
>> ? ? ? ? ? ? ? ?each: ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?properties: ? ? a Dictionary(#documents->a Dictionary()
>> #hideFromMenus->false #loca...etc...
>> ? ? ? ? ? ? ? ?decorations: ? ?an Array(a PUSecurity[382730240] a PRChildren[757071872])
>> ? ? ? ? ? ? ? ?parent: ? ? ? ? nil
>> ? ? ? ? ? ? ? ?name: ? 'pier'
>> ? ? ? ? ? ? ? ?title: ?'Cloud208.com'
>> ? ? ? ? ? ? ? ?tags: ? #()
>> ? ? ? ? ? ? ? ?document: ? ? ? a PRDocument[657195008]
>>
>> [:each | (aBlock value: each)
>> ? ? ? ? ? ? ? ?ifFalse: [^ false]] in Array(Collection)>>allSatisfy:
>> ? ? ? ?Receiver: an Array(a PUSecurity[382730240] a PRChildren[757071872])
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? a PUSecurity[382730240]
>> ? ? ? ? ? ? ? ?each: ? [:each | each isAllowedCommand: aCommandClass in: aContext]
>> ? ? ? ?Receiver's instance variables:
>> an Array(a PUSecurity[382730240] a PRChildren[757071872])
>>
>> Array(SequenceableCollection)>>do:
>> ? ? ? ?Receiver: an Array(a PUSecurity[382730240] a PRChildren[757071872])
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? [:each | (aBlock value: each)
>> ? ? ? ? ? ? ? ?ifFalse: [^ false]]
>> ? ? ? ? ? ? ? ?index: ?1
>> ? ? ? ? ? ? ? ?indexLimiT: ? ? 2
>> ? ? ? ?Receiver's instance variables:
>> an Array(a PUSecurity[382730240] a PRChildren[757071872])
>>
>> Array(Collection)>>allSatisfy:
>> ? ? ? ?Receiver: an Array(a PUSecurity[382730240] a PRChildren[757071872])
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? [:each | each isAllowedCommand: aCommandClass in: aContext]
>> ? ? ? ?Receiver's instance variables:
>> an Array(a PUSecurity[382730240] a PRChildren[757071872])
>>
>> PRPage(PRStructure)>>isAllowedCommand:in:
>> ? ? ? ?Receiver: a PRPage[7077888] name: 'pier'
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aCommandClass: ?PRViewCommand
>> ? ? ? ? ? ? ? ?aContext: ? ? ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?properties: ? ? a Dictionary(#documents->a Dictionary()
>> #hideFromMenus->false #loca...etc...
>> ? ? ? ? ? ? ? ?decorations: ? ?an Array(a PUSecurity[382730240] a PRChildren[757071872])
>> ? ? ? ? ? ? ? ?parent: ? ? ? ? nil
>> ? ? ? ? ? ? ? ?name: ? 'pier'
>> ? ? ? ? ? ? ? ?title: ?'Cloud208.com'
>> ? ? ? ? ? ? ? ?tags: ? #()
>> ? ? ? ? ? ? ? ?document: ? ? ? a PRDocument[657195008]
>>
>> PRPage(PRStructure)>>isValidCommand:in:
>> ? ? ? ?Receiver: a PRPage[7077888] name: 'pier'
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aCommandClass: ?PRViewCommand
>> ? ? ? ? ? ? ? ?aContext: ? ? ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?properties: ? ? a Dictionary(#documents->a Dictionary()
>> #hideFromMenus->false #loca...etc...
>> ? ? ? ? ? ? ? ?decorations: ? ?an Array(a PUSecurity[382730240] a PRChildren[757071872])
>> ? ? ? ? ? ? ? ?parent: ? ? ? ? nil
>> ? ? ? ? ? ? ? ?name: ? 'pier'
>> ? ? ? ? ? ? ? ?title: ?'Cloud208.com'
>> ? ? ? ? ? ? ? ?tags: ? #()
>> ? ? ? ? ? ? ? ?document: ? ? ? a PRDocument[657195008]
>>
>> PRViewCommand class(PRCommand class)>>isValidIn:
>> ? ? ? ?Receiver: PRViewCommand
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aContext: ? ? ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?superclass: ? ? PRCommand
>> ? ? ? ? ? ? ? ?methodDict: ? ? a
>> MethodDictionary(#asComponent->(PRViewCommand>>#asComponent "a
>> Co...etc...
>> ? ? ? ? ? ? ? ?format: ? ? ? ? 144
>> ? ? ? ? ? ? ? ?instanceVariables: ? ? ?nil
>> ? ? ? ? ? ? ? ?organization: ? ('*pier-seaside-accessing' defaultViewComponentClass
>> label render...etc...
>> ? ? ? ? ? ? ? ?subclasses: ? ? nil
>> ? ? ? ? ? ? ? ?name: ? #PRViewCommand
>> ? ? ? ? ? ? ? ?classPool: ? ? ?nil
>> ? ? ? ? ? ? ? ?sharedPools: ? ?nil
>> ? ? ? ? ? ? ? ?environment: ? ?a SystemDictionary(lots of globals)
>> ? ? ? ? ? ? ? ?category: ? ? ? #'Pier-Model-Command'
>> ? ? ? ? ? ? ? ?traitComposition: ? ? ? {}
>> ? ? ? ? ? ? ? ?localSelectors: ? ? ? ? nil
>>
>> PRContext>>isValidCommand:
>> ? ? ? ?Receiver: a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aCommandClass: ?PRViewCommand
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?properties: ? ? a Dictionary(#user->nil )
>> ? ? ? ? ? ? ? ?kernel: ? ? ? ? a PRKernel[532414464] name: 'pier'
>> ? ? ? ? ? ? ? ?structure: ? ? ?a PRPage[7077888] name: 'pier'
>> ? ? ? ? ? ? ? ?command: ? ? ? ?a PRViewCommand[435159040]
>>
>> PRContext>>isValid
>> ? ? ? ?Receiver: a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ?Arguments and temporary variables:
>>
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?properties: ? ? a Dictionary(#user->nil )
>> ? ? ? ? ? ? ? ?kernel: ? ? ? ? a PRKernel[532414464] name: 'pier'
>> ? ? ? ? ? ? ? ?structure: ? ? ?a PRPage[7077888] name: 'pier'
>> ? ? ? ? ? ? ? ?command: ? ? ? ?a PRViewCommand[435159040]
>>
>> PRPierFrame>>context:
>> ? ? ? ?Receiver: a PRPierFrame
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aContext: ? ? ? a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
>> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ? ? ? ? ?children: ? ? ? nil
>>
>> PRPierFrame>>initialRequest:
>> ? ? ? ?Receiver: a PRPierFrame
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aRequest: ? ? ? a WARequest method: GET uri: / version: HTTP/1.1
>> ? ? ? ? ? ? ? ?structure: ? ? ?a PRPage[7077888] name: 'pier'
>> ? ? ? ? ? ? ? ?following: ? ? ?a PRContext[435945472] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
>> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ? ? ? ? ?children: ? ? ? nil
>>
>> WAInitialRequestVisitor>>visitPresenter:
>> ? ? ? ?Receiver: a WAInitialRequestVisitor
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aPresenter: ? ? a PRPierFrame
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?request: ? ? ? ?a WARequest method: GET uri: / version: HTTP/1.1
>>
>> WAInitialRequestVisitor(WAPainterVisitor)>>visitComponent:
>> ? ? ? ?Receiver: a WAInitialRequestVisitor
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aComponent: ? ? a PRPierFrame
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?request: ? ? ? ?a WARequest method: GET uri: / version: HTTP/1.1
>>
>> PRPierFrame(WAComponent)>>accept:
>> ? ? ? ?Receiver: a PRPierFrame
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aVisitor: ? ? ? a WAInitialRequestVisitor
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
>> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ? ? ? ? ?children: ? ? ? nil
>>
>> WAInitialRequestVisitor(WAVisitor)>>visit:
>> ? ? ? ?Receiver: a WAInitialRequestVisitor
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?anObject: ? ? ? a PRPierFrame
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?request: ? ? ? ?a WARequest method: GET uri: / version: HTTP/1.1
>>
>> WAAllPresenterGuide(WAPresenterGuide)>>visitPainter:
>> ? ? ? ?Receiver: a WAAllPresenterGuide
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aPainter: ? ? ? a PRPierFrame
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>>
>> WAAllPresenterGuide(WAPainterVisitor)>>visitPresenter:
>> ? ? ? ?Receiver: a WAAllPresenterGuide
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aPresenter: ? ? a PRPierFrame
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>>
>> WAAllPresenterGuide(WAVisiblePresenterGuide)>>visitPresenter:
>> ? ? ? ?Receiver: a WAAllPresenterGuide
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aPresenter: ? ? a PRPierFrame
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>>
>> WAAllPresenterGuide(WAPainterVisitor)>>visitComponent:
>> ? ? ? ?Receiver: a WAAllPresenterGuide
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aComponent: ? ? a PRPierFrame
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>>
>> PRPierFrame(WAComponent)>>accept:
>> ? ? ? ?Receiver: a PRPierFrame
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aVisitor: ? ? ? a WAAllPresenterGuide
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
>> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ? ? ? ? ?children: ? ? ? nil
>>
>> WAAllPresenterGuide(WAVisiblePresenterGuide)>>visitDecoration:
>> ? ? ? ?Receiver: a WAAllPresenterGuide
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aDecoration: ? ?a WAToolDecoration
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>>
>> WAToolDecoration(WADecoration)>>accept:
>> ? ? ? ?Receiver: a WAToolDecoration
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aVisitor: ? ? ? a WAAllPresenterGuide
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?next: ? a WAValueHolder contents: a PRPierFrame
>> ? ? ? ? ? ? ? ?plugins: ? ? ? ?an OrderedCollection(a WANewSessionToolPlugin a
>> WAConfigureToolPlugin ...etc...
>> ? ? ? ? ? ? ? ?showHalos: ? ? ?a WAValueHolder contents: false
>> ? ? ? ? ? ? ? ?halos: ?an IdentityDictionary()
>>
>> WAAllPresenterGuide(WAPainterVisitor)>>visitDecorationsOfComponent:
>> ? ? ? ?Receiver: a WAAllPresenterGuide
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aComponent: ? ? a PRPierFrame
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>>
>> PRPierFrame(WAComponent)>>acceptDecorated:
>> ? ? ? ?Receiver: a PRPierFrame
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aVisitor: ? ? ? a WAAllPresenterGuide
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
>> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ? ? ? ? ?children: ? ? ? nil
>>
>> [super acceptDecorated: aPainterVisitor] in PRPierFrame>>acceptDecorated:
>> ? ? ? ?Receiver: a PRPierFrame
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aPainterVisitor: ? ? ? ?a WAAllPresenterGuide
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
>> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ? ? ? ? ?children: ? ? ? nil
>>
>> BlockClosure>>on:do:
>> ? ? ? ?Receiver: [super acceptDecorated: aPainterVisitor]
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?exception: ? ? ?PRCurrentContext
>> ? ? ? ? ? ? ? ?handlerAction: ?[:notification | notification resume: anObject]
>> ? ? ? ? ? ? ? ?handlerActive: ?true
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?outerContext: ? PRPierFrame>>acceptDecorated:
>> ? ? ? ? ? ? ? ?startpc: ? ? ? ?27
>> ? ? ? ? ? ? ? ?numArgs: ? ? ? ?0
>>
>> PRCurrentContext class>>use:during:
>> ? ? ? ?Receiver: PRCurrentContext
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?anObject: ? ? ? a PRPierFrame
>> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? [super acceptDecorated: aPainterVisitor]
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?superclass: ? ? GRNotification
>> ? ? ? ? ? ? ? ?methodDict: ? ? a MethodDictionary()
>> ? ? ? ? ? ? ? ?format: ? ? ? ? 140
>> ? ? ? ? ? ? ? ?instanceVariables: ? ? ?nil
>> ? ? ? ? ? ? ? ?organization: ? ('as yet unclassified')
>>
>> ? ? ? ? ? ? ? ?subclasses: ? ? nil
>> ? ? ? ? ? ? ? ?name: ? #PRCurrentContext
>> ? ? ? ? ? ? ? ?classPool: ? ? ?nil
>> ? ? ? ? ? ? ? ?sharedPools: ? ?nil
>> ? ? ? ? ? ? ? ?environment: ? ?a SystemDictionary(lots of globals)
>> ? ? ? ? ? ? ? ?category: ? ? ? #'Pier-Model-Kernel'
>> ? ? ? ? ? ? ? ?traitComposition: ? ? ? {}
>> ? ? ? ? ? ? ? ?localSelectors: ? ? ? ? nil
>>
>> PRPierFrame>>withContextDo:
>> ? ? ? ?Receiver: a PRPierFrame
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aBlock: ? ? ? ? [super acceptDecorated: aPainterVisitor]
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
>> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ? ? ? ? ?children: ? ? ? nil
>>
>> PRPierFrame>>acceptDecorated:
>> ? ? ? ?Receiver: a PRPierFrame
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aPainterVisitor: ? ? ? ?a WAAllPresenterGuide
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?decoration: ? ? a WAValueHolder contents: a WAToolDecoration
>> ? ? ? ? ? ? ? ?context: ? ? ? ?a PRContext[398721024] structure: 'Cloud208.com' command: 'View'
>> ? ? ? ? ? ? ? ?children: ? ? ? nil
>>
>> WAAllPresenterGuide(WAPresenterGuide)>>visit:
>> ? ? ? ?Receiver: a WAAllPresenterGuide
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?aPainter: ? ? ? a PRPierFrame
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>>
>> WAAllPresenterGuide(WAVisitor)>>start:
>> ? ? ? ?Receiver: a WAAllPresenterGuide
>> ? ? ? ?Arguments and temporary variables:
>> ? ? ? ? ? ? ? ?anObject: ? ? ? a PRPierFrame
>> ? ? ? ?Receiver's instance variables:
>> ? ? ? ? ? ? ? ?client: ? ? ? ? a WAInitialRequestVisitor
>>
>>
>> --- The full stack ---
>> UndefinedObject(Object)>>doesNotUnderstand: #includes:
>> PUGroup>>includes:
>> PUSecurity>>hasPermission:for:
>> [:permission | self hasPermission: permission for: aContext user] in
>> PUSecurity>>isAllowedCommand:in:
>> [:each |
>> (aBlock value: each)
>> ? ? ? ? ? ? ? ?ifTrue: [^ true].
>> ? ? ? ?nil] in Array(Collection)>>anySatisfy:
>> Array(SequenceableCollection)>>do:
>> Array(Collection)>>anySatisfy:
>> PUSecurity>>isAllowedCommand:in:
>> [:each | each isAllowedCommand: aCommandClass in: aContext] in
>> PRPage(PRStructure)>>isAllowedCommand:in:
>> [:each | (aBlock value: each)
>> ? ? ? ? ? ? ? ?ifFalse: [^ false]] in Array(Collection)>>allSatisfy:
>> Array(SequenceableCollection)>>do:
>> Array(Collection)>>allSatisfy:
>> PRPage(PRStructure)>>isAllowedCommand:in:
>> PRPage(PRStructure)>>isValidCommand:in:
>> PRViewCommand class(PRCommand class)>>isValidIn:
>> PRContext>>isValidCommand:
>> PRContext>>isValid
>> PRPierFrame>>context:
>> PRPierFrame>>initialRequest:
>> WAInitialRequestVisitor>>visitPresenter:
>> WAInitialRequestVisitor(WAPainterVisitor)>>visitComponent:
>> PRPierFrame(WAComponent)>>accept:
>> WAInitialRequestVisitor(WAVisitor)>>visit:
>> WAAllPresenterGuide(WAPresenterGuide)>>visitPainter:
>> WAAllPresenterGuide(WAPainterVisitor)>>visitPresenter:
>> WAAllPresenterGuide(WAVisiblePresenterGuide)>>visitPresenter:
>> WAAllPresenterGuide(WAPainterVisitor)>>visitComponent:
>> PRPierFrame(WAComponent)>>accept:
>> WAAllPresenterGuide(WAVisiblePresenterGuide)>>visitDecoration:
>> WAToolDecoration(WADecoration)>>accept:
>> WAAllPresenterGuide(WAPainterVisitor)>>visitDecorationsOfComponent:
>> PRPierFrame(WAComponent)>>acceptDecorated:
>> [super acceptDecorated: aPainterVisitor] in PRPierFrame>>acceptDecorated:
>> BlockClosure>>on:do:
>> PRCurrentContext class>>use:during:
>> PRPierFrame>>withContextDo:
>> PRPierFrame>>acceptDecorated:
>> WAAllPresenterGuide(WAPresenterGuide)>>visit:
>> WAAllPresenterGuide(WAVisitor)>>start:
>> ?- - - - - - - - - - - - - - -
>> ? ? ? ? ? ? ? ? ? ? ? ?- - - - - - - - - - - - - - - - - -
>> WARenderLoopMain>>prepareRoot:
>> WARenderLoopMain>>start
>> WASession>>start
>> [^ self start] in WASession>>handleFiltered:
>> WAMergedRequestFields>>at:ifAbsent:
>> WASession>>handleFiltered:
>> WAMutualExclusionFilter(WARequestFilter)>>handleFiltered:
>> [super handleFiltered: aRequestContext] in
>> WAMutualExclusionFilter>>handleFiltered:
>> BlockClosure>>ensure:
>> [owner := process.
>> ? ? ? ?aBlock
>> ? ? ? ? ? ? ? ?ensure: [owner := nil]] in WAMutex>>critical:
>> [caught := true.
>> ? ? ? ?self wait.
>> ? ? ? ?blockValue := mutuallyExcludedBlock value] in Semaphore>>critical:
>> BlockClosure>>ensure:
>> Semaphore>>critical:
>> WAMutex>>critical:
>> WAMutualExclusionFilter>>handleFiltered:
>> [self filter handleFiltered: aRequestContext] in
>> WASession(WARequestHandler)>>handle:
>> BlockClosure>>on:do:
>> WACurrentRequestContext class(WADynamicVariable class)>>use:during:
>> [WACurrentRequestContext use: self during: aBlock] in
>> WARequestContext>>push:while:
>> BlockClosure>>ensure:
>> WARequestContext>>push:while:
>> WASession(WARequestHandler)>>handle:
>> WAApplication(WARegistry)>>dispatch:to:
>> WAApplication(WARegistry)>>handle:registering:
>> WAApplication>>handleDefault:
>> WAApplication(WARegistry)>>handleFiltered:
>> WAApplication>>handleFiltered:
>> WAExceptionFilter(WARequestFilter)>>handleFiltered:
>> [super handleFiltered: aRequestContext] in WAExceptionFilter>>handleFiltered:
>> BlockClosure>>on:do:
>> WAWalkbackErrorHandler(WAExceptionHandler)>>handleExceptionsDuring:
>> WAWalkbackErrorHandler class(WAExceptionHandler
>> class)>>handleExceptionsDuring:context:
>> WAExceptionFilter>>handleFiltered:
>> [self filter handleFiltered: aRequestContext] in
>> WAApplication(WARequestHandler)>>handle:
>> BlockClosure>>on:do:
>> WACurrentRequestContext class(WADynamicVariable class)>>use:during:
>> [WACurrentRequestContext use: self during: aBlock] in
>> WARequestContext>>push:while:
>> BlockClosure>>ensure:
>> WARequestContext>>push:while:
>> WAApplication(WARequestHandler)>>handle:
>> WADispatcher>>handleFiltered:named:
>> WADispatcher>>handleDefault:
>> WADispatcher>>handleFiltered:
>> [self filter handleFiltered: aRequestContext] in
>> WADispatcher(WARequestHandler)>>handle:
>> BlockClosure>>on:do:
>> WACurrentRequestContext class(WADynamicVariable class)>>use:during:
>> [WACurrentRequestContext use: self during: aBlock] in
>> WARequestContext>>push:while:
>> BlockClosure>>ensure:
>> WARequestContext>>push:while:
>> WADispatcher(WARequestHandler)>>handle:
>> [self requestHandler handle: aRequestContext] in
>> WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
>> BlockClosure>>on:do:
>> WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
>> WAComancheAdaptor(WAServerAdaptor)>>handle:
>> [self handle: context;
>> ? ? ? ? ? ? ? ? responseFrom: context] in WAComancheAdaptor(WAServerAdaptor)>>process:
>> BlockClosure>>ensure:
>> WAComancheAdaptor(WAServerAdaptor)>>process:
>> WAComancheAdaptor>>processHttpRequest:
>> HttpService>>processHttpRequest:
>> [self target processHttpRequest: request] in HttpAdaptor>>dispatchRequest:
>> BlockClosure>>on:do:
>> HttpService>>handleDispatchErrorsIn:
>> HttpAdaptor>>dispatchRequest:
>> [[[request := self readRequest]
>> ? ? ? ? ? ? ? ?on: Error
>> ? ? ? ? ? ? ? ?do: [:ex | continue := false].
>> ? ? ? ?continue
>> ? ? ? ? ? ? ? ?ifTrue: [response := self dispatchRequest: request.
>> ? ? ? ? ? ? ? ? ? ? ? ?self
>> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?addConnectionHeaders: response
>> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?request: request
>> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?count: count.
>> ? ? ? ? ? ? ? ? ? ? ? ?(self writeResponse: response for: request)
>> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?ifFalse: [^ self].
>> ? ? ? ? ? ? ? ? ? ? ? ?count := count + 1.
>> ? ? ? ? ? ? ? ? ? ? ? ?continue := response isPersistent
>> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?and: [count < limit]].
>> ? ? ? ?continue] whileTrue.
>> ? ? ? ?nil] in HttpAdaptor>>beginConversation
>> BlockClosure>>ensure:
>> HttpAdaptor>>beginConversation
>> HttpAdaptor class>>readAndWriteTo:service:
>> HttpAdaptor class>>readAndWriteToSocket:service:
>> HttpService>>serve:
>> [self serve: aSocket] in HttpService(TcpService)>>value:
>> [self value.
>> ? ? ? ?Processor terminateActive] in BlockClosure>>newProcess
>> _______________________________________________
>> Magritte, Pier and Related Tools ...
>> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>>
>
>
>
> --
> Lukas Renggli
> www.lukas-renggli.ch
>
> _______________________________________________
> Magritte, Pier and Related Tools ...
> https://www.iam.unibe.ch/mailman/listinfo/smallwiki
>


From davorin.rusevljan at gmail.com  Tue Apr 26 17:49:27 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Tue, 26 Apr 2011 17:49:27 +0200
Subject: More Import woves
In-Reply-To: <BANLkTiksKLjf00eHg5RcwTzmgfFg=j9eYA@mail.gmail.com>
References: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>
	<BANLkTimdtiUM5ebX8LtvrXL+Bt2Gt+nBkg@mail.gmail.com>
	<BANLkTiksKLjf00eHg5RcwTzmgfFg=j9eYA@mail.gmail.com>
Message-ID: <BANLkTikshfOhMVYg8CMdv3KpgiEbQt3urg@mail.gmail.com>

Hello Lukas,

Do you have some advice what to do with embeded inst vars of PRLink(s),  1.2
expects them to be bools while my 1.1 contains arrays, sometimes non empty.

Davorin Rusevljan

On Apr 23, 2011 10:35 AM, "Davorin Rusevljan" <davorin.rusevljan at gmail.com>
wrote:

On Sat, Apr 23, 2011 at 8:48 AM, Lukas Renggli <renggli at gmail.com> wrote:
> Strange that your groups...
That moved me one step further.

Next obstacle is PRInternalLink which in embeded inst var has empty
Array, while and this array gets returned by isEmbeded, and then gets
used as boolean in some block.

Did semantics of embeded inst var changed from 1.1 to 1.2? (and what
are they now :)

Maybe I could alter all instances of PRLink that have empty arrays as
embeded to be set to false, and other ones to true, but I do not know
if this is going to break something else since original embeded
informaton would be lost.

Thanks,

Davorin

Thanks



>
> There might be other problems like this. And don't forget to check
> your permissions afterwar...
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://www.iam.unibe.ch/pipermail/smallwiki/attachments/20110426/f1095ece/attachment.html>

From renggli at gmail.com  Tue Apr 26 22:51:51 2011
From: renggli at gmail.com (Lukas Renggli)
Date: Tue, 26 Apr 2011 22:51:51 +0200
Subject: More Import woves
In-Reply-To: <BANLkTikshfOhMVYg8CMdv3KpgiEbQt3urg@mail.gmail.com>
References: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>
	<BANLkTimdtiUM5ebX8LtvrXL+Bt2Gt+nBkg@mail.gmail.com>
	<BANLkTiksKLjf00eHg5RcwTzmgfFg=j9eYA@mail.gmail.com>
	<BANLkTikshfOhMVYg8CMdv3KpgiEbQt3urg@mail.gmail.com>
Message-ID: <BANLkTikBRNrM_QxALCRTDtK=ykfjMO3tOw@mail.gmail.com>

> Do you have some advice what to do with embeded inst vars of PRLink(s),? 1.2
> expects them to be bools while my 1.1 contains arrays, sometimes non empty.

You have to figure out how to move the contents into the right
variables using #instVarAt: and #instVarAt:put:. However, in your case
it is probably easier if you use SIXX -- or try to adapt the
import/export code to use SmartRefStream -- that both can handle
instance variable changes. Then you only need to fix the "new"
variables.

Lukas

-- 
Lukas Renggli
www.lukas-renggli.ch


From davorin.rusevljan at gmail.com  Wed Apr 27 07:45:20 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Wed, 27 Apr 2011 07:45:20 +0200
Subject: More Import woves
In-Reply-To: <BANLkTikKm3-tivSbFVE+r_ANa0Cjj9SGWw@mail.gmail.com>
References: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>
	<BANLkTimdtiUM5ebX8LtvrXL+Bt2Gt+nBkg@mail.gmail.com>
	<BANLkTiksKLjf00eHg5RcwTzmgfFg=j9eYA@mail.gmail.com>
	<BANLkTikshfOhMVYg8CMdv3KpgiEbQt3urg@mail.gmail.com>
	<BANLkTikBRNrM_QxALCRTDtK=ykfjMO3tOw@mail.gmail.com>
	<BANLkTikKm3-tivSbFVE+r_ANa0Cjj9SGWw@mail.gmail.com>
Message-ID: <BANLkTi=HiURjZ10qQLEV-uG5s-VgpEU3-w@mail.gmail.com>

Thanks for tip regarding sixx. Anyway, what bothers me is embeded inst var
of PRLink that existed in both 1.1 and 1.2. But 1.2 expects it to be true or
false, while my 1.1 PRLinks have arrays in them that contain some data. Now
I could overwrite those arrays with true or false, but what about
information that those arrays contained should I store it somewhere else?

So the question is more what was meaning of embeded inst var before, what is
now and how should they be logically migrated?

Thanks,

Davorin Rusevljan

On Apr 26, 2011 10:54 PM, "Lukas Renggli" <renggli at gmail.com> wrote:

> Do you have some advice what to do with embeded inst vars of PRLink(s),
1.2
> expects them to be ...
You have to figure out how to move the contents into the right
variables using #instVarAt: and #instVarAt:put:. However, in your case
it is probably easier if you use SIXX -- or try to adapt the
import/export code to use SmartRefStream -- that both can handle
instance variable changes. Then you only need to fix the "new"
variables.

Lukas

--

Lukas Renggli
www.lukas-renggli.ch

_______________________________________________
Magritte, Pier a...
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://www.iam.unibe.ch/pipermail/smallwiki/attachments/20110427/ba906928/attachment.html>

From renggli at gmail.com  Wed Apr 27 08:00:35 2011
From: renggli at gmail.com (Lukas Renggli)
Date: Wed, 27 Apr 2011 08:00:35 +0200
Subject: More Import woves
In-Reply-To: <BANLkTi=HiURjZ10qQLEV-uG5s-VgpEU3-w@mail.gmail.com>
References: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>
	<BANLkTimdtiUM5ebX8LtvrXL+Bt2Gt+nBkg@mail.gmail.com>
	<BANLkTiksKLjf00eHg5RcwTzmgfFg=j9eYA@mail.gmail.com>
	<BANLkTikshfOhMVYg8CMdv3KpgiEbQt3urg@mail.gmail.com>
	<BANLkTikBRNrM_QxALCRTDtK=ykfjMO3tOw@mail.gmail.com>
	<BANLkTikKm3-tivSbFVE+r_ANa0Cjj9SGWw@mail.gmail.com>
	<BANLkTi=HiURjZ10qQLEV-uG5s-VgpEU3-w@mail.gmail.com>
Message-ID: <BANLkTim2_BFPiAPvAJkknghuwbsQHGdW6Q@mail.gmail.com>

To find out about the instance variables you have to compare the code,
i don't remember these changes of the top of my head.

There is something else you might to try: There should be a class
PRMigrations (or similar, I don't have an image to verify) with a
bunch of class side methods that I used to bring the objects along
from the first version of Pier to today. Run #initialize after import
to give it a try. Not sure it handels well a non-incremental change
like in your case, but it is relatively safe to run as it does all
kind of verifications to validate and fix the model.

Lukas

On Wednesday, 27 April 2011, Davorin Rusevljan
<davorin.rusevljan at gmail.com> wrote:
> Thanks for tip regarding sixx. Anyway, what bothers me is embeded inst var of PRLink that existed in both 1.1 and 1.2. But 1.2 expects it to be true or false, while my 1.1 PRLinks have arrays in them that contain some data. Now I could overwrite those arrays with true or false, but what about information that those arrays contained should I store it somewhere else?
>
> So the question is more what was meaning of embeded inst var before, what is now and how should they be logically migrated?
> Thanks,
> Davorin Rusevljan
>
> On Apr 26, 2011 10:54 PM, "Lukas Renggli" <renggli at gmail.com> wrote:
>
>> Do you have some advice what to do with embeded inst vars of PRLink(s),? 1.2
>> expects them to be ...You have to figure out how to move the contents into the right
> variables using #instVarAt: and #instVarAt:put:. However, in your case
> it is probably easier if you use SIXX -- or try to adapt the
> import/export code to use SmartRefStream -- that both can handle
> instance variable changes. Then you only need to fix the "new"
> variables.
>
> Lukas
>
> --
> Lukas Renggli
> www.lukas-renggli.ch
>
> _______________________________________________
> Magritte, Pier a...
>

-- 
Lukas Renggli
www.lukas-renggli.ch


From davorin.rusevljan at gmail.com  Wed Apr 27 09:03:09 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Wed, 27 Apr 2011 09:03:09 +0200
Subject: More Import woves
In-Reply-To: <BANLkTim2_BFPiAPvAJkknghuwbsQHGdW6Q@mail.gmail.com>
References: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>
	<BANLkTimdtiUM5ebX8LtvrXL+Bt2Gt+nBkg@mail.gmail.com>
	<BANLkTiksKLjf00eHg5RcwTzmgfFg=j9eYA@mail.gmail.com>
	<BANLkTikshfOhMVYg8CMdv3KpgiEbQt3urg@mail.gmail.com>
	<BANLkTikBRNrM_QxALCRTDtK=ykfjMO3tOw@mail.gmail.com>
	<BANLkTikKm3-tivSbFVE+r_ANa0Cjj9SGWw@mail.gmail.com>
	<BANLkTi=HiURjZ10qQLEV-uG5s-VgpEU3-w@mail.gmail.com>
	<BANLkTim2_BFPiAPvAJkknghuwbsQHGdW6Q@mail.gmail.com>
Message-ID: <BANLkTi=2KH5Hapnc9fsPX=-MhQ1OUutTtg@mail.gmail.com>

On Wed, Apr 27, 2011 at 8:00 AM, Lukas Renggli <renggli at gmail.com> wrote:
> To find out about the instance variables you have to compare the code,
> i don't remember these changes of the top of my head.
>
> There is something else you might to try: There should be a class
> PRMigrations (or similar, I don't have an image to verify) with a
> bunch of class side methods that I used to bring the objects along
> from the first version of Pier to today. Run #initialize after import
> to give it a try. Not sure it handels well a non-incremental change
> like in your case, but it is relatively safe to run as it does all
> kind of verifications to validate and fix the model.

Thanks, I will give it a whirl.

Davorin Rusevljan

From geert.wl.claes at gmail.com  Wed Apr 27 13:39:01 2011
From: geert.wl.claes at gmail.com (Geert Claes)
Date: Wed, 27 Apr 2011 04:39:01 -0700 (PDT)
Subject: Magritte hanger
Message-ID: <1303904341169-3477856.post@n4.nabble.com>

I thought people in this mailing list probably appreciate this design:
http://design-milk.com/magritte-hanger

--
View this message in context: http://forum.world.st/Magritte-hanger-tp3477856p3477856.html
Sent from the Magritte, Pier and Related Tools mailing list archive at Nabble.com.

From davorin.rusevljan at gmail.com  Wed Apr 27 23:08:31 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Wed, 27 Apr 2011 23:08:31 +0200
Subject: More Import woves
In-Reply-To: <BANLkTi=2KH5Hapnc9fsPX=-MhQ1OUutTtg@mail.gmail.com>
References: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>
	<BANLkTimdtiUM5ebX8LtvrXL+Bt2Gt+nBkg@mail.gmail.com>
	<BANLkTiksKLjf00eHg5RcwTzmgfFg=j9eYA@mail.gmail.com>
	<BANLkTikshfOhMVYg8CMdv3KpgiEbQt3urg@mail.gmail.com>
	<BANLkTikBRNrM_QxALCRTDtK=ykfjMO3tOw@mail.gmail.com>
	<BANLkTikKm3-tivSbFVE+r_ANa0Cjj9SGWw@mail.gmail.com>
	<BANLkTi=HiURjZ10qQLEV-uG5s-VgpEU3-w@mail.gmail.com>
	<BANLkTim2_BFPiAPvAJkknghuwbsQHGdW6Q@mail.gmail.com>
	<BANLkTi=2KH5Hapnc9fsPX=-MhQ1OUutTtg@mail.gmail.com>
Message-ID: <BANLkTi=f1fxCBiPckbNx8GjsFdcs9NJ-7A@mail.gmail.com>

>> There is something else you might to try: There should be a class
>> PRMigrations (or similar, I don't have an image to verify) with a
>> bunch of class side methods that I used to bring the objects along
>> from the first version of Pier to today. Run #initialize after import
>> to give it a try. Not sure it handels well a non-incremental change
>> like in your case, but it is relatively safe to run as it does all
>> kind of verifications to validate and fix the model.
>
> Thanks, I will give it a whirl.

bummer. PRMigrations does not have anything related to embeded inst
var. I have tried running initialize on it anyway, but it also breaks
on: migrateLinkOwner method. I have executed all other migrate*
methods. Changed all embeded instvars that had arrays in them to
booleans with:

PRLink allSubInstances do: [:link| (link embedded isKindOf: Array)
ifTrue: [link embedded: (link embedded size > 0)]].

Only to move to another problem.

PRPage(Object)>>doesNotUnderstand: #inject:into:
	Receiver: a PRPage[49283072] name: 'mainenvironment'
	Arguments and temporary variables:
		aMessage: 	inject: a WAHtmlAttributes() into: [:attributes :each |
(self attrib...etc...
		exception: 	MessageNotUnderstood: PRPage>>inject:into:
		resumeValue: 	nil
	Receiver's instance variables:
		properties: 	a Dictionary(#documents->a Dictionary()
#hideFromMenus->false #loca...etc...
		decorations: 	an Array(a PUSecurity[1069285376])
		parent: 	a PRPage[7077888] name: 'pier'
		name: 	'mainenvironment'
		title: 	'_Main Environment'
		tags: 	#()
		document: 	a PRDocument[408420352]

PRReferenceRenderer(PRLinkRenderer)>>attributesFor:
	Receiver: a PRReferenceRenderer
	Arguments and temporary variables:
		aLink: 	a PRInternalLink[514588672]
	Receiver's instance variables:
		escaper: 	nil
		component: 	a PRPierFrame
		html: 	a WARenderCanvas
		parent: 	a PRViewRenderer
		link: 	a PRInternalLink[514588672]

PRReferenceRenderer(PRLinkRenderer)>>anchorFor:
	Receiver: a PRReferenceRenderer
	Arguments and temporary variables:
		aLink: 	a PRInternalLink[514588672]
		anchor: 	a WAAnchorTag
	Receiver's instance variables:
		escaper: 	nil
		component: 	a PRPierFrame
		html: 	a WARenderCanvas
		parent: 	a PRViewRenderer
		link: 	a PRInternalLink[514588672]

PRReferenceRenderer>>visitInternalLink:
	Receiver: a PRReferenceRenderer
	Arguments and temporary variables:
		aLink: 	a PRInternalLink[514588672]
		anchor: 	nil
	Receiver's instance variables:
		escaper: 	nil
		component: 	a PRPierFrame
		html: 	a WARenderCanvas
		parent: 	a PRViewRenderer
		link: 	a PRInternalLink[514588672]

PRInternalLink>>accept:
	Receiver: a PRInternalLink[514588672]
	Arguments and temporary variables:
		aVisitor: 	a PRReferenceRenderer
	Receiver's instance variables:
		properties: 	nil
		children: 	#()
		reference: 	'/environment/header'
		owner: 	true
		embedded: 	false
		parameters: 	a PRPage[49283072] name: 'mainenvironment'
		target: 	a PRPage[348651520] name: 'header'
		anchor: 	nil

>
> Davorin Rusevljan
>

From davorin.rusevljan at gmail.com  Thu Apr 28 17:26:23 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Thu, 28 Apr 2011 17:26:23 +0200
Subject: More Import woves
In-Reply-To: <BANLkTi=f1fxCBiPckbNx8GjsFdcs9NJ-7A@mail.gmail.com>
References: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>
	<BANLkTimdtiUM5ebX8LtvrXL+Bt2Gt+nBkg@mail.gmail.com>
	<BANLkTiksKLjf00eHg5RcwTzmgfFg=j9eYA@mail.gmail.com>
	<BANLkTikshfOhMVYg8CMdv3KpgiEbQt3urg@mail.gmail.com>
	<BANLkTikBRNrM_QxALCRTDtK=ykfjMO3tOw@mail.gmail.com>
	<BANLkTikKm3-tivSbFVE+r_ANa0Cjj9SGWw@mail.gmail.com>
	<BANLkTi=HiURjZ10qQLEV-uG5s-VgpEU3-w@mail.gmail.com>
	<BANLkTim2_BFPiAPvAJkknghuwbsQHGdW6Q@mail.gmail.com>
	<BANLkTi=2KH5Hapnc9fsPX=-MhQ1OUutTtg@mail.gmail.com>
	<BANLkTi=f1fxCBiPckbNx8GjsFdcs9NJ-7A@mail.gmail.com>
Message-ID: <BANLkTi=-LydKCQk=-raANvGxNST+Vm3i_g@mail.gmail.com>

Now Lukas,

please bear with me.

I have fetched the 1.1 image that is running my blog to my local
machine for inspection, and as you have suggested the origin of
problems is that the layout of instance variables has changed from 1.1
to 1.2 and deserialization stuffs data into wrong slots, for instance
old PRLink had instance variables:

'reference' 'embedded' 'parameters'

While the new one has:

'reference' 'owner' 'embedded' 'parameters'

which results in parameters getting stuffed into embedded inst var, so
embedded after import suddenly has all those arrays in them instead of
nice booleans the code expects.

Now I have run a snippet of code to list all subclasses of PRObject in
old and new image along with inst vars they have, and the diffed that.
Result is 9 classes that have changed layout. I suspect some of them
can not appear in serialized data, but I guess you will know better.

Anyway for those 9 classes I would kindly ask you to give me a hint
how to correctly migrate them, i.e. what to stuff into empty slots. So
here goes the list (class, then old layout then new):

----------
PRAddCommand
#('name' 'type' 'link')
#('name' 'type' 'link' 'title')
----------
PRCommand
#('timestamp' 'context' 'answer' 'checked')
#('timestamp' 'context' 'checked' 'successAnswer' 'cancelAnswer' 'answer')
----------
PRComponent
#('componentClass' 'settings')
#('componentClass' 'settings' 'link')
----------
PRGoogleGadget
#('url' 'xml' 'settings' 'description')
#('url' 'xml' 'translations' 'settings' 'description')
----------
PRInternalLink
#('owner' 'target' 'anchor')
#('target' 'anchor')
----------
PRLink
#('reference' 'embedded' 'parameters')
#('reference' 'owner' 'embedded' 'parameters')
----------
PULogin
#('ancestor' 'username' 'password' 'user')
#('username' 'password' 'user')
----------
PUMember
#('name')
#('name' 'comment')
----------
PUUser
#('password' 'groups' 'superuser')
#('password' 'token' 'groups' 'superuser' 'firstName' 'lastName' 'email')


Thanks!

Davorin Rusevljan
http://www.cloud208.com/

From renggli at gmail.com  Thu Apr 28 18:41:46 2011
From: renggli at gmail.com (Lukas Renggli)
Date: Thu, 28 Apr 2011 18:41:46 +0200
Subject: More Import woves
In-Reply-To: <BANLkTi=-LydKCQk=-raANvGxNST+Vm3i_g@mail.gmail.com>
References: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>
	<BANLkTimdtiUM5ebX8LtvrXL+Bt2Gt+nBkg@mail.gmail.com>
	<BANLkTiksKLjf00eHg5RcwTzmgfFg=j9eYA@mail.gmail.com>
	<BANLkTikshfOhMVYg8CMdv3KpgiEbQt3urg@mail.gmail.com>
	<BANLkTikBRNrM_QxALCRTDtK=ykfjMO3tOw@mail.gmail.com>
	<BANLkTikKm3-tivSbFVE+r_ANa0Cjj9SGWw@mail.gmail.com>
	<BANLkTi=HiURjZ10qQLEV-uG5s-VgpEU3-w@mail.gmail.com>
	<BANLkTim2_BFPiAPvAJkknghuwbsQHGdW6Q@mail.gmail.com>
	<BANLkTi=2KH5Hapnc9fsPX=-MhQ1OUutTtg@mail.gmail.com>
	<BANLkTi=f1fxCBiPckbNx8GjsFdcs9NJ-7A@mail.gmail.com>
	<BANLkTi=-LydKCQk=-raANvGxNST+Vm3i_g@mail.gmail.com>
Message-ID: <BANLkTikBbZAFEUW0UmJ8k-yC-we+m7yiRA@mail.gmail.com>

> Now I have run a snippet of code to list all subclasses of PRObject in
> old and new image along with inst vars they have, and the diffed that.
> Result is 9 classes that have changed layout. I suspect some of them
> can not appear in serialized data, but I guess you will know better.

Subclasses of PRCommand should not be part of the serialized data.

> Anyway for those 9 classes I would kindly ask you to give me a hint
> how to correctly migrate them, i.e. what to stuff into empty slots. So
> here goes the list (class, then old layout then new):

You just have to make sure that a value in inst-var 'x' ends up in
inst-var 'x'. And that new variables are initialized with 'nil'.
"PRMigration initialize" fixes the rest.

Lukas

-- 
Lukas Renggli
www.lukas-renggli.ch

From davorin.rusevljan at gmail.com  Fri Apr 29 00:30:12 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Fri, 29 Apr 2011 00:30:12 +0200
Subject: More Import woves
In-Reply-To: <BANLkTikBbZAFEUW0UmJ8k-yC-we+m7yiRA@mail.gmail.com>
References: <BANLkTikkJWS=uUxbtfSwNPAwAomuj3VeXw@mail.gmail.com>
	<BANLkTimdtiUM5ebX8LtvrXL+Bt2Gt+nBkg@mail.gmail.com>
	<BANLkTiksKLjf00eHg5RcwTzmgfFg=j9eYA@mail.gmail.com>
	<BANLkTikshfOhMVYg8CMdv3KpgiEbQt3urg@mail.gmail.com>
	<BANLkTikBRNrM_QxALCRTDtK=ykfjMO3tOw@mail.gmail.com>
	<BANLkTikKm3-tivSbFVE+r_ANa0Cjj9SGWw@mail.gmail.com>
	<BANLkTi=HiURjZ10qQLEV-uG5s-VgpEU3-w@mail.gmail.com>
	<BANLkTim2_BFPiAPvAJkknghuwbsQHGdW6Q@mail.gmail.com>
	<BANLkTi=2KH5Hapnc9fsPX=-MhQ1OUutTtg@mail.gmail.com>
	<BANLkTi=f1fxCBiPckbNx8GjsFdcs9NJ-7A@mail.gmail.com>
	<BANLkTi=-LydKCQk=-raANvGxNST+Vm3i_g@mail.gmail.com>
	<BANLkTikBbZAFEUW0UmJ8k-yC-we+m7yiRA@mail.gmail.com>
Message-ID: <BANLkTi=u6yP1RekXLkAW-3A1mwTTHHpaQw@mail.gmail.com>

On Thu, Apr 28, 2011 at 6:41 PM, Lukas Renggli <renggli at gmail.com> wrote:
> You just have to make sure that a value in inst-var 'x' ends up in
> inst-var 'x'. And that new variables are initialized with 'nil'.
> "PRMigration initialize" fixes the rest.

Ok, there were still things to fix by hand after the PRMigration
initialize, but I think I have managed to import kernel in the end.
Although something along the way started html escaping parts of the
html in my heading, but I guess I will look into that next day.

Many thanks!

Davorin Rusevljan
http://www.cloud208.com/

From davorin.rusevljan at gmail.com  Fri Apr 29 12:28:28 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Fri, 29 Apr 2011 12:28:28 +0200
Subject: Build #514
Message-ID: <BANLkTikpyE3VJ4Q4d4mUs=tCXSvwjcinJA@mail.gmail.com>

I have downloaded one click build #514 from jenkins, unziped it.

When I click on Blog on top of the page following exception is raised
in the image:


VM: Win32 - IX86 - 5.1 - Croquet Closure Cog VM [CoInterpreter VMMaker-oscog.51]
Image: Pharo1.2.1 [Latest update: #12345]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir C:\test\pier20-build-514\Pier.app\Contents\Resources
Trusted Dir C:\test\pier20-build-514\Pier.app\Contents\Resources\RUSEVLJD
Untrusted Dir C:\Documents and Settings\rusevljd\My Documents\My Squeak

WAHtmlResponseGenerator(Object)>>doesNotUnderstand: #statusForbidden
	Receiver: a WAHtmlResponseGenerator
	Arguments and temporary variables:
		aMessage: 	statusForbidden
		exception: 	MessageNotUnderstood: WAHtmlResponseGenerator>>statusForbidden
		resumeValue: 	nil
	Receiver's instance variables:
		requestContext: 	a WARequestContext url: '/pier/about'

WAApplication>>handleFiltered:
	Receiver: a WAApplication
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		filter: 	a WAValueHolder contents: a WAExceptionFilter
		parent: 	a WADispatcher
		configuration: 	a WAUserConfiguration
		cache: 	a WACache

WAExceptionFilter(WARequestFilter)>>handleFiltered:
	Receiver: a WAExceptionFilter
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		next: 	a WAValueHolder contents: a WAApplication
		configuration: 	a WAUserConfiguration

[super handleFiltered: aRequestContext] in WAExceptionFilter>>handleFiltered:
	Receiver: a WAExceptionFilter
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		next: 	a WAValueHolder contents: a WAApplication
		configuration: 	a WAUserConfiguration

BlockClosure>>on:do:
	Receiver: [super handleFiltered: aRequestContext]
	Arguments and temporary variables:
		exception: 	a WAWalkbackErrorHandler
		handlerAction: 	[:exception | [self handleException: exception]
		on: Error
		do...etc...
		handlerActive: 	false
	Receiver's instance variables:
		outerContext: 	WAExceptionFilter>>handleFiltered:
		startpc: 	32
		numArgs: 	0

WAWalkbackErrorHandler(WAExceptionHandler)>>handleExceptionsDuring:
	Receiver: a WAWalkbackErrorHandler
	Arguments and temporary variables:
		aBlock: 	[super handleFiltered: aRequestContext]
	Receiver's instance variables:
		requestContext: 	a WARequestContext url: '/pier/about'

WAWalkbackErrorHandler class(WAExceptionHandler
class)>>handleExceptionsDuring:context:
	Receiver: WAWalkbackErrorHandler
	Arguments and temporary variables:
		aBlock: 	[super handleFiltered: aRequestContext]
		aRequestContext: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		superclass: 	WADebugErrorHandler
		methodDict: 	a
MethodDictionary(#open:->(WAWalkbackErrorHandler>>#open: "a
Compi...etc...
		format: 	132
		instanceVariables: 	nil
		organization: 	('actions' open:)

		subclasses: 	nil
		name: 	#WAWalkbackErrorHandler
		classPool: 	nil
		sharedPools: 	nil
		environment: 	a SystemDictionary(lots of globals)
		category: 	#'Seaside-Development-Core'
		traitComposition: 	{}
		localSelectors: 	nil

WAExceptionFilter>>handleFiltered:
	Receiver: a WAExceptionFilter
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		next: 	a WAValueHolder contents: a WAApplication
		configuration: 	a WAUserConfiguration

[self filter handleFiltered: aRequestContext] in
WAApplication(WARequestHandler)>>handle:
	Receiver: a WAApplication
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		filter: 	a WAValueHolder contents: a WAExceptionFilter
		parent: 	a WADispatcher
		configuration: 	a WAUserConfiguration
		cache: 	a WACache

BlockClosure>>on:do:
	Receiver: [self filter handleFiltered: aRequestContext]
	Arguments and temporary variables:
		exception: 	WACurrentRequestContext
		handlerAction: 	[:notification | notification resume: anObject]
		handlerActive: 	true
	Receiver's instance variables:
		outerContext: 	WAApplication(WARequestHandler)>>handle:
		startpc: 	32
		numArgs: 	0

WACurrentRequestContext class(WADynamicVariable class)>>use:during:
	Receiver: WACurrentRequestContext
	Arguments and temporary variables:
		anObject: 	a WARequestContext url: '/pier/about'
		aBlock: 	[self filter handleFiltered: aRequestContext]
	Receiver's instance variables:
		superclass: 	WADynamicVariable
		methodDict: 	a MethodDictionary()
		format: 	140
		instanceVariables: 	nil
		organization: 	('as yet unclassified')

		subclasses: 	nil
		name: 	#WACurrentRequestContext
		classPool: 	nil
		sharedPools: 	nil
		environment: 	a SystemDictionary(lots of globals)
		category: 	#'Seaside-Core-RequestHandling'
		traitComposition: 	{}
		localSelectors: 	nil

[WACurrentRequestContext use: self during: aBlock] in
WARequestContext>>push:while:
	Receiver: a WARequestContext url: '/pier/about'
	Arguments and temporary variables:
		aBlock: 	[self filter handleFiltered: aRequestContext]
	Receiver's instance variables:
		handlers: 	an OrderedCollection(a WAApplication a WADispatcher)
		request: 	a WARequest method: GET uri: /pier/about version: HTTP/1.1
		response: 	a WABufferedResponse status: 200 message: 'OK'
		codec: 	a GRPharoUtf8Codec name: 'utf-8'
		consumer: 	a WAPathConsumer
		properties: 	nil

BlockClosure>>ensure:
	Receiver: [WACurrentRequestContext use: self during: aBlock]
	Arguments and temporary variables:
		aBlock: 	[handlers removeFirst]
		complete: 	nil
		returnValue: 	nil
	Receiver's instance variables:
		outerContext: 	WARequestContext>>push:while:
		startpc: 	42
		numArgs: 	0

WARequestContext>>push:while:
	Receiver: a WARequestContext url: '/pier/about'
	Arguments and temporary variables:
		aRequestHandler: 	a WAApplication
		aBlock: 	[self filter handleFiltered: aRequestContext]
	Receiver's instance variables:
		handlers: 	an OrderedCollection(a WAApplication a WADispatcher)
		request: 	a WARequest method: GET uri: /pier/about version: HTTP/1.1
		response: 	a WABufferedResponse status: 200 message: 'OK'
		codec: 	a GRPharoUtf8Codec name: 'utf-8'
		consumer: 	a WAPathConsumer
		properties: 	nil

WAApplication(WARequestHandler)>>handle:
	Receiver: a WAApplication
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		filter: 	a WAValueHolder contents: a WAExceptionFilter
		parent: 	a WADispatcher
		configuration: 	a WAUserConfiguration
		cache: 	a WACache

WADispatcher>>handleFiltered:named:
	Receiver: a WADispatcher
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
		aString: 	'pier'
	Receiver's instance variables:
		filter: 	a WAValueHolder contents: a WADispatcher
		parent: 	nil
		configuration: 	a WAUserConfiguration
		defaultName: 	'pier'
		handlers: 	a Dictionary('browse'->a WAApplication 'comet'->a
WADispatcher 'confi...etc...

WADispatcher>>handleFiltered:
	Receiver: a WADispatcher
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
		consumer: 	a WAPathConsumer
	Receiver's instance variables:
		filter: 	a WAValueHolder contents: a WADispatcher
		parent: 	nil
		configuration: 	a WAUserConfiguration
		defaultName: 	'pier'
		handlers: 	a Dictionary('browse'->a WAApplication 'comet'->a
WADispatcher 'confi...etc...

[self filter handleFiltered: aRequestContext] in
WADispatcher(WARequestHandler)>>handle:
	Receiver: a WADispatcher
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		filter: 	a WAValueHolder contents: a WADispatcher
		parent: 	nil
		configuration: 	a WAUserConfiguration
		defaultName: 	'pier'
		handlers: 	a Dictionary('browse'->a WAApplication 'comet'->a
WADispatcher 'confi...etc...

BlockClosure>>on:do:
	Receiver: [self filter handleFiltered: aRequestContext]
	Arguments and temporary variables:
		exception: 	WACurrentRequestContext
		handlerAction: 	[:notification | notification resume: anObject]
		handlerActive: 	true
	Receiver's instance variables:
		outerContext: 	WADispatcher(WARequestHandler)>>handle:
		startpc: 	32
		numArgs: 	0

WACurrentRequestContext class(WADynamicVariable class)>>use:during:
	Receiver: WACurrentRequestContext
	Arguments and temporary variables:
		anObject: 	a WARequestContext url: '/pier/about'
		aBlock: 	[self filter handleFiltered: aRequestContext]
	Receiver's instance variables:
		superclass: 	WADynamicVariable
		methodDict: 	a MethodDictionary()
		format: 	140
		instanceVariables: 	nil
		organization: 	('as yet unclassified')

		subclasses: 	nil
		name: 	#WACurrentRequestContext
		classPool: 	nil
		sharedPools: 	nil
		environment: 	a SystemDictionary(lots of globals)
		category: 	#'Seaside-Core-RequestHandling'
		traitComposition: 	{}
		localSelectors: 	nil

[WACurrentRequestContext use: self during: aBlock] in
WARequestContext>>push:while:
	Receiver: a WARequestContext url: '/pier/about'
	Arguments and temporary variables:
		aBlock: 	[self filter handleFiltered: aRequestContext]
	Receiver's instance variables:
		handlers: 	an OrderedCollection(a WAApplication a WADispatcher)
		request: 	a WARequest method: GET uri: /pier/about version: HTTP/1.1
		response: 	a WABufferedResponse status: 200 message: 'OK'
		codec: 	a GRPharoUtf8Codec name: 'utf-8'
		consumer: 	a WAPathConsumer
		properties: 	nil

BlockClosure>>ensure:
	Receiver: [WACurrentRequestContext use: self during: aBlock]
	Arguments and temporary variables:
		aBlock: 	[handlers removeFirst]
		complete: 	nil
		returnValue: 	nil
	Receiver's instance variables:
		outerContext: 	WARequestContext>>push:while:
		startpc: 	42
		numArgs: 	0

WARequestContext>>push:while:
	Receiver: a WARequestContext url: '/pier/about'
	Arguments and temporary variables:
		aRequestHandler: 	a WADispatcher
		aBlock: 	[self filter handleFiltered: aRequestContext]
	Receiver's instance variables:
		handlers: 	an OrderedCollection(a WAApplication a WADispatcher)
		request: 	a WARequest method: GET uri: /pier/about version: HTTP/1.1
		response: 	a WABufferedResponse status: 200 message: 'OK'
		codec: 	a GRPharoUtf8Codec name: 'utf-8'
		consumer: 	a WAPathConsumer
		properties: 	nil

WADispatcher(WARequestHandler)>>handle:
	Receiver: a WADispatcher
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		filter: 	a WAValueHolder contents: a WADispatcher
		parent: 	nil
		configuration: 	a WAUserConfiguration
		defaultName: 	'pier'
		handlers: 	a Dictionary('browse'->a WAApplication 'comet'->a
WADispatcher 'confi...etc...

[self requestHandler handle: aRequestContext] in
WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
	Receiver: a WAComancheAdaptor
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		manager: 	a WAServerManager
		port: 	8080
		requestHandler: 	nil
		codec: 	a GRPharoUtf8Codec name: 'utf-8'
		streamUploads: 	false
		service: 	seaside-8080 [running] port: 8080

BlockClosure>>on:do:
	Receiver: [self requestHandler handle: aRequestContext]
	Arguments and temporary variables:
		exception: 	WAResponseNotification
		handlerAction: 	[:n | nil]
		handlerActive: 	true
	Receiver's instance variables:
		outerContext: 	WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
		startpc: 	34
		numArgs: 	0

WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
	Receiver: a WAComancheAdaptor
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		manager: 	a WAServerManager
		port: 	8080
		requestHandler: 	nil
		codec: 	a GRPharoUtf8Codec name: 'utf-8'
		streamUploads: 	false
		service: 	seaside-8080 [running] port: 8080

WAComancheAdaptor(WAServerAdaptor)>>handle:
	Receiver: a WAComancheAdaptor
	Arguments and temporary variables:
		aRequestContext: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		manager: 	a WAServerManager
		port: 	8080
		requestHandler: 	nil
		codec: 	a GRPharoUtf8Codec name: 'utf-8'
		streamUploads: 	false
		service: 	seaside-8080 [running] port: 8080

[self handle: context;
		 responseFrom: context] in WAComancheAdaptor(WAServerAdaptor)>>process:
	Receiver: a WAComancheAdaptor
	Arguments and temporary variables:
		context: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		manager: 	a WAServerManager
		port: 	8080
		requestHandler: 	nil
		codec: 	a GRPharoUtf8Codec name: 'utf-8'
		streamUploads: 	false
		service: 	seaside-8080 [running] port: 8080

BlockClosure>>ensure:
	Receiver: [self handle: context;
		 responseFrom: context]
	Arguments and temporary variables:
		aBlock: 	[context destroy]
		complete: 	nil
		returnValue: 	nil
	Receiver's instance variables:
		outerContext: 	WAComancheAdaptor(WAServerAdaptor)>>process:
		startpc: 	42
		numArgs: 	0

WAComancheAdaptor(WAServerAdaptor)>>process:
	Receiver: a WAComancheAdaptor
	Arguments and temporary variables:
		aNativeRequest: 	HttpRequest (URL=/pier/about; protocol=HTTP/1.1;
header=a Dicti...etc...
		context: 	a WARequestContext url: '/pier/about'
	Receiver's instance variables:
		manager: 	a WAServerManager
		port: 	8080
		requestHandler: 	nil
		codec: 	a GRPharoUtf8Codec name: 'utf-8'
		streamUploads: 	false
		service: 	seaside-8080 [running] port: 8080

WAComancheAdaptor>>processHttpRequest:
	Receiver: a WAComancheAdaptor
	Arguments and temporary variables:
		aRequest: 	HttpRequest (URL=/pier/about; protocol=HTTP/1.1; header=a
Dictionary(...etc...
	Receiver's instance variables:
		manager: 	a WAServerManager
		port: 	8080
		requestHandler: 	nil
		codec: 	a GRPharoUtf8Codec name: 'utf-8'
		streamUploads: 	false
		service: 	seaside-8080 [running] port: 8080

HttpService>>processHttpRequest:
	Receiver: seaside-8080 [running] port: 8080
	Arguments and temporary variables:
		anHttpRequest: 	HttpRequest (URL=/pier/about; protocol=HTTP/1.1;
header=a Dictio...etc...
	Receiver's instance variables:
		name: 	'seaside-8080'
		process: 	a Process in [self schedule.
	beingWaitedOn
		ifTrue: [delaySemaphore ...etc...
		stopSignal: 	nil
		priority: 	nil
		portNumber: 	8080
		address: 	nil
		plug: 	a WAComancheAdaptor
		mode: 	#deployment

[self target processHttpRequest: request] in HttpAdaptor>>dispatchRequest:
	Receiver: a HttpAdaptor
	Arguments and temporary variables:
		request: 	HttpRequest (URL=/pier/about; protocol=HTTP/1.1; header=a
Dictionary('...etc...
	Receiver's instance variables:
		stream: 	SocketStream[inbuf:4kb/outbuf:4kb]
		httpService: 	seaside-8080 [running] port: 8080

BlockClosure>>on:do:
	Receiver: [self target processHttpRequest: request]
	Arguments and temporary variables:
		exception: 	Error
		handlerAction: 	[:ex | self errorResponseStatus: #serverError
description: ex de...etc...
		handlerActive: 	true
	Receiver's instance variables:
		outerContext: 	HttpAdaptor>>dispatchRequest:
		startpc: 	48
		numArgs: 	0

HttpService>>handleDispatchErrorsIn:
	Receiver: seaside-8080 [running] port: 8080
	Arguments and temporary variables:
		aBlock: 	[self target processHttpRequest: request]
	Receiver's instance variables:
		name: 	'seaside-8080'
		process: 	a Process in [self schedule.
	beingWaitedOn
		ifTrue: [delaySemaphore ...etc...
		stopSignal: 	nil
		priority: 	nil
		portNumber: 	8080
		address: 	nil
		plug: 	a WAComancheAdaptor
		mode: 	#deployment

HttpAdaptor>>dispatchRequest:
	Receiver: a HttpAdaptor
	Arguments and temporary variables:
		request: 	HttpRequest (URL=/pier/about; protocol=HTTP/1.1; header=a
Dictionary('...etc...
		response: 	nil
	Receiver's instance variables:
		stream: 	SocketStream[inbuf:4kb/outbuf:4kb]
		httpService: 	seaside-8080 [running] port: 8080

[[[request := self readRequest]
		on: Error
		do: [:ex | continue := false].
	continue
		ifTrue: [response := self dispatchRequest: request.
			self
				addConnectionHeaders: response
				request: request
				count: count.
			(self writeResponse: response for: request)
				ifFalse: [^ self].
			count := count + 1.
			continue := response isPersistent
						and: [count < limit]].
	continue] whileTrue.
	nil] in HttpAdaptor>>beginConversation
	Receiver: a HttpAdaptor
	Arguments and temporary variables:
<<error during printing>
	Receiver's instance variables:
		stream: 	SocketStream[inbuf:4kb/outbuf:4kb]
		httpService: 	seaside-8080 [running] port: 8080

BlockClosure>>ensure:
	Receiver: [[[request := self readRequest]
		on: Error
		do: [:ex | continue := false].
	continue
		i...etc...
	Arguments and temporary variables:
		aBlock: 	[self destroy]
		complete: 	nil
		returnValue: 	nil
	Receiver's instance variables:
		outerContext: 	HttpAdaptor>>beginConversation
		startpc: 	73
		numArgs: 	0


--- The full stack ---
WAHtmlResponseGenerator(Object)>>doesNotUnderstand: #statusForbidden
WAApplication>>handleFiltered:
WAExceptionFilter(WARequestFilter)>>handleFiltered:
[super handleFiltered: aRequestContext] in WAExceptionFilter>>handleFiltered:
BlockClosure>>on:do:
WAWalkbackErrorHandler(WAExceptionHandler)>>handleExceptionsDuring:
WAWalkbackErrorHandler class(WAExceptionHandler
class)>>handleExceptionsDuring:context:
WAExceptionFilter>>handleFiltered:
[self filter handleFiltered: aRequestContext] in
WAApplication(WARequestHandler)>>handle:
BlockClosure>>on:do:
WACurrentRequestContext class(WADynamicVariable class)>>use:during:
[WACurrentRequestContext use: self during: aBlock] in
WARequestContext>>push:while:
BlockClosure>>ensure:
WARequestContext>>push:while:
WAApplication(WARequestHandler)>>handle:
WADispatcher>>handleFiltered:named:
WADispatcher>>handleFiltered:
[self filter handleFiltered: aRequestContext] in
WADispatcher(WARequestHandler)>>handle:
BlockClosure>>on:do:
WACurrentRequestContext class(WADynamicVariable class)>>use:during:
[WACurrentRequestContext use: self during: aBlock] in
WARequestContext>>push:while:
BlockClosure>>ensure:
WARequestContext>>push:while:
WADispatcher(WARequestHandler)>>handle:
[self requestHandler handle: aRequestContext] in
WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
BlockClosure>>on:do:
WAComancheAdaptor(WAServerAdaptor)>>handleRequest:
WAComancheAdaptor(WAServerAdaptor)>>handle:
[self handle: context;
		 responseFrom: context] in WAComancheAdaptor(WAServerAdaptor)>>process:
BlockClosure>>ensure:
WAComancheAdaptor(WAServerAdaptor)>>process:
WAComancheAdaptor>>processHttpRequest:
HttpService>>processHttpRequest:
[self target processHttpRequest: request] in HttpAdaptor>>dispatchRequest:
BlockClosure>>on:do:
HttpService>>handleDispatchErrorsIn:
HttpAdaptor>>dispatchRequest:
[[[request := self readRequest]
		on: Error
		do: [:ex | continue := false].
	continue
		ifTrue: [response := self dispatchRequest: request.
			self
				addConnectionHeaders: response
				request: request
				count: count.
			(self writeResponse: response for: request)
				ifFalse: [^ self].
			count := count + 1.
			continue := response isPersistent
						and: [count < limit]].
	continue] whileTrue.
	nil] in HttpAdaptor>>beginConversation
BlockClosure>>ensure:
 - - - - - - - - - - - - - - -
			- - - - - - - - - - - - - - - - - -
HttpAdaptor>>beginConversation
HttpAdaptor class>>readAndWriteTo:service:
HttpAdaptor class>>readAndWriteToSocket:service:
HttpService>>serve:
[self serve: aSocket] in HttpService(TcpService)>>value:
[self value.
	Processor terminateActive] in BlockClosure>>newProcess

From davorin.rusevljan at gmail.com  Fri Apr 29 16:50:15 2011
From: davorin.rusevljan at gmail.com (Davorin Rusevljan)
Date: Fri, 29 Apr 2011 16:50:15 +0200
Subject: Deploying few Piers - options
Message-ID: <BANLkTimUyzv_ypYnWVT=2POnn7X3rYM5yQ@mail.gmail.com>

Hi,

what would be suggested path if one wants to deploy few low traffic
Piers? All Piers in one image or one image per Pier?

Davorin Rusevljan
http://www.cloud208.com/

From razavi at acm.org  Fri Apr 29 17:24:03 2011
From: razavi at acm.org (Reza Razavi)
Date: Fri, 29 Apr 2011 17:24:03 +0200
Subject: Deploying few Piers - options
In-Reply-To: <BANLkTimUyzv_ypYnWVT=2POnn7X3rYM5yQ@mail.gmail.com>
References: <BANLkTimUyzv_ypYnWVT=2POnn7X3rYM5yQ@mail.gmail.com>
Message-ID: <ae3f9f$4r4dar@smtp.pt.lu>

Hi Davorin,

It's technically possible to deploy one image with several 
distributions. I've already deployed a few ones. This reduces 
significantly the deployment costs. However, you may need to tweet 
parts of the code. However, as I've done this a few months ago, I 
unfortunately can't tell you where and what may exactly need changes.

Cheers,
Reza

At 16:50 29/04/2011, Davorin Rusevljan wrote:
>Hi,
>
>what would be suggested path if one wants to deploy few low traffic
>Piers? All Piers in one image or one image per Pier?
>
>Davorin Rusevljan
>http://www.cloud208.com/
>_______________________________________________
>Magritte, Pier and Related Tools ...
>https://www.iam.unibe.ch/mailman/listinfo/smallwiki