[Pharo-users] How to add a contextual menu to a Spec ListModel

[Sven Van Caekenberghe]

Hi,

I am struggle a bit in find the right way to add a contextual menu to a Spec 
ListModel.

Consider:

ListModel new 
  title: 'List Example';
  items: Smalltalk allClasses; 
  openWithSpec.

I would like to add a right-click contextual menu to the list, with for example 
a 'Browse' action. I can't find such a simple example. I know there is a #menu: 
option, I can see some usages in my image, but they seem to do different 
things. What would be the recommended approach ?

ListModel new 
  title: 'List Example';
  items: Smalltalk allClasses; 
  "menu: [ ];"
  openWithSpec.

Thanks,

Sven

PS: Probably the reference to the #selectedItem of the ListModel for the action 
is hard to write in a one-liner, that is not a requirement.