Spec中MultiColumnList中的打开菜单给出了MNU

时间:2014-07-08 05:23:29

标签: menuitem smalltalk pharo spec-ui

在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 个答案:

答案 0 :(得分:0)

这是Spec中一个众所周知的当前错误。右键单击MNU有几个地方