Кажется, что действия не работают хорошо в динамическом представлении. Но это работает безупречно, если вы добавляете действие во внутреннюю презентацию (в данном случае в GLMTextPresentation).
finder := GLMFinder new.
finder show: [:a |
a dynamic display:
(GLMTextPresentation new forSmalltalk;
act: [self halt]
on: $k
entitled: 'Implementors (k)')
].
finder openOn: 'Waaaaaaa'