Filtered RB view

Has anyone produced a set of modifications for the RB where
the list of Pundles is a reduced set, i.e. not the entire
system?

I tried using the PundleEnvironment but I did not get the
list of pundles. Instead, I saw all the classes in one list.

Thanks.

Terry
 
===========================================================
Terry Raymond
Crafted Smalltalk
80 Lazywood Ln.
Tiverton, RI  02878
(401) 624-4517      [hidden email]
===========================================================


_______________________________________________
vwnc mailing list
[hidden email]
http://lists.cs.uiuc.edu/mailman/listinfo/vwnc

Not sure how far back this goes, but at least as of 7.7.1 you should be able to "Spawn Selected" packages into a browser of their own with the environment set up accordingly.

HTH,

Martin
 
"Terry Raymond"<[hidden email]> wrote:

_______________________________________________
vwnc mailing list
[hidden email]
http://lists.cs.uiuc.edu/mailman/listinfo/vwnc

Terry,

Is this what you're looking for?

pundles := #('Base VisualWorks' 'Assets').
env := Refactory.Browser.PundleEnvironment
        onEnvironment: Refactory.Browser.BrowserEnvironment new
        codeComponents: (pundles
                                inject: Set new
                                into: [:set :pat | set
                                                        addAll:
(Store.Registry allPundles select: [:ea | pat match: ea name]);
                                                        yourself]).
env openEditor.

-Boris


-----Original Message-----
From: [hidden email] [mailto:[hidden email]] On
Behalf Of Terry Raymond
Sent: Monday, October 03, 2011 3:40 PM
To: VWNC
Subject: [vwnc] Filtered RB view

Has anyone produced a set of modifications for the RB where the list of
Pundles is a reduced set, i.e. not the entire system?

I tried using the PundleEnvironment but I did not get the list of
pundles. Instead, I saw all the classes in one list.

Thanks.

Terry
 
===========================================================
Terry Raymond
Crafted Smalltalk
80 Lazywood Ln.
Tiverton, RI  02878
(401) 624-4517      [hidden email]
===========================================================


_______________________________________________
vwnc mailing list
[hidden email]
http://lists.cs.uiuc.edu/mailman/listinfo/vwnc

_______________________________________________
vwnc mailing list
[hidden email]
http://lists.cs.uiuc.edu/mailman/listinfo/vwnc

Boris:

> (Store.Registry allPundles select: [:ea | pat match: ea name])

        (pundles
                inject: Set new
                into: [:sum :each |
                sum add: (Store.Registry pundleNamed: each); yourself).

Or maybe:

        pundles collect: [:each | Store.Registry pundleNamed: each].

                                And So It Goes
                                     Sames
______________________________________________________________________

Samuel S. Shuster [|]
VisualWorks Engineering, Store Project
Smalltalk Enables Success -- What Are YOU Using?




_______________________________________________
vwnc mailing list
[hidden email]
http://lists.cs.uiuc.edu/mailman/listinfo/vwnc

Sam,

Ah, but:

pundles := #('Seaside*').
env := Refactory.Browser.PundleEnvironment
        onEnvironment: Refactory.Browser.BrowserEnvironment new
        codeComponents: (pundles
                                inject: Set new
                                into: [:set :pat | set
                                                        addAll:
(Store.Registry allPundles select: [:ea | pat match: ea name]);
                                                        yourself]).
env openEditor.

-Boris


-----Original Message-----
From: Samuel S. Shuster [mailto:[hidden email]]
Sent: Monday, October 03, 2011 4:18 PM
To: Boris Popov, DeepCove Labs
Cc: Terry Raymond; VWNC
Subject: Re: [vwnc] Filtered RB view

Boris:

> (Store.Registry allPundles select: [:ea | pat match: ea name])

        (pundles
                inject: Set new
                into: [:sum :each |
                sum add: (Store.Registry pundleNamed: each); yourself).

Or maybe:

        pundles collect: [:each | Store.Registry pundleNamed: each].

                                And So It Goes
                                     Sames
______________________________________________________________________

Samuel S. Shuster [|]
VisualWorks Engineering, Store Project
Smalltalk Enables Success -- What Are YOU Using?





_______________________________________________
vwnc mailing list
[hidden email]
http://lists.cs.uiuc.edu/mailman/listinfo/vwnc