MenuEditor.st
changeset 3664 0d01da886d5a
parent 3636 197a2fbb8c5d
child 3751 5c7bb0559dc1
equal deleted inserted replaced
3663:9d49ecf8661a 3664:0d01da886d5a
  1761 
  1761 
  1762     "Modified: / 08-03-2007 / 22:59:42 / cg"
  1762     "Modified: / 08-03-2007 / 22:59:42 / cg"
  1763 !
  1763 !
  1764 
  1764 
  1765 hasNonLinkedMenuSelectedHolder
  1765 hasNonLinkedMenuSelectedHolder
  1766     "boolean holder, true if a single non linked menu item is selected
  1766     "boolean holder, true if a single non linked menu item is selected"
  1767     "
  1767 
  1768     ^ BlockValue
  1768     ^ BlockValue
  1769         with:[:m | 
  1769         with:[:selection | 
  1770                 |items| 
  1770                 (selection size == 1) 
  1771 
  1771                  and:[selection first isKindOfNonLinkedMenu
  1772                 items := self selectionHolder value.
  1772                  and:[selection first isRootItem not]]
  1773                 (items size == 1) 
       
  1774                 and:[items first isKindOfNonLinkedMenu
       
  1775                 and:[items first isRootItem not]]
       
  1776              ]
  1773              ]
  1777         argument:(self selectionHolder)
  1774         argument:(self selectionHolder)
       
  1775 
       
  1776     "Modified: / 17-05-2019 / 16:18:19 / Stefan Vogel"
  1778 !
  1777 !
  1779 
  1778 
  1780 hasSelectionChannel
  1779 hasSelectionChannel
  1781     "boolean holder, true if any item is selected
  1780     "boolean holder, true if any item is selected
  1782     "
  1781     "