Открытие меню в MultiColumnList в Spec дает MNU
В Pharo 3 щелчок правой кнопкой мыши в меню с использованием MultiColumnListModel дает сообщение MessageNotUnderstood, как показано в следующем примере кода:
| specModel list itemMenu group1 item1 |
itemMenu := MenuModel new.
item1 := MenuItemModel new
name: 'Browse';
shortcut: $b command;
enabled: true;
action: [ self halt ];
yourself.
group1 := MenuGroupModel new
addMenuItem: item1;
autoRefresh: true;
yourself.
itemMenu addMenuGroup: group1.
specModel := DynamicComposableModel new
instantiateModels: #(list MultiColumnListModel);
yourself.
list := specModel list
items: {$a. $b. $c. $d. $f.};
displayBlock: [:e | {e asString. e isVowel asString} ];
menu: itemMenu;
yourself.
specModel
openWithSpecLayout: (SpecLayout composed
newRow: [: r | r add: #list ];
yourself).
Это ошибка в Spec или я что-то упустил?
1 ответ
Это хорошо известная в настоящее время ошибка в Spec. Есть несколько мест, где правой кнопкой мыши MNU