--- a/Tools__ViewTreeApplication.st	Thu May 02 21:27:16 2019 +0200
+++ b/Tools__ViewTreeApplication.st	Thu May 02 22:46:37 2019 +0200
@@ -1604,6 +1604,8 @@
 middleButtonMenu
     "returns the middleButton menu for the single selected view tree item or nil"
 
+    <resource: #programMenu >
+
     ^ [
         |viewTreeItem|
 
@@ -1619,6 +1621,7 @@
       ]
 
     "Modified: / 16-08-2017 / 13:48:31 / cg"
+    "Modified: / 02-05-2019 / 22:39:49 / Claus Gittinger"
 !
 
 submenuApplications:aMenu