#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Thu, 06 Jun 2019 23:22:16 +0200
changeset 6600 9a4a44808e01
parent 6599 c74062ad83c7
child 6601 4ccac038bf9b
#REFACTORING by cg class: PopUpMenu class changed: #forMenu:
PopUpMenu.st
--- a/PopUpMenu.st	Thu Jun 06 11:26:38 2019 +0200
+++ b/PopUpMenu.st	Thu Jun 06 23:22:16 2019 +0200
@@ -400,12 +400,14 @@
     |newMenu|
 
     aMenuView isView ifFalse:[
-        self error:'bad argument'
+        ArgumentError raise
     ].
     newMenu := self onSameDeviceAs:aMenuView. 
     newMenu addSubView:aMenuView.
     newMenu menuView:aMenuView.
     ^ newMenu
+
+    "Modified: / 06-06-2019 / 23:22:10 / Claus Gittinger"
 !
 
 itemList:itemList resources:resources