Fixed typo in CustomMenuBuilder - rename afterMenuItemLabeled to afterMenuItemLabelled
authorJakub Nesveda <jakubnesveda@seznam.cz>
Sun, 04 Jan 2015 15:29:46 +0100
changeset 795 944c5812e702
parent 794 43e92ac26ce7
child 796 1e98cf455d2d
Fixed typo in CustomMenuBuilder - rename afterMenuItemLabeled to afterMenuItemLabelled
CustomMenuBuilder.st
CustomMenuBuilderTests.st
extensions.st
patches/patches.rc
refactoring_custom.rc
--- a/CustomMenuBuilder.st	Mon Dec 29 10:42:55 2014 +0100
+++ b/CustomMenuBuilder.st	Sun Jan 04 15:29:46 2015 +0100
@@ -1,7 +1,7 @@
 "{ Package: 'jn:refactoring_custom' }"
 
 Object subclass:#CustomMenuBuilder
-	instanceVariableNames:'perspective menu submenuLabel afterMenuItemLabeled
+	instanceVariableNames:'perspective menu submenuLabel afterMenuItemLabelled
 		generatorOrRefactoringFilter resources navigationState manager'
 	classVariableNames:''
 	poolDictionaries:''
@@ -39,19 +39,19 @@
 
 !CustomMenuBuilder methodsFor:'accessing'!
 
-afterMenuItemLabeled
+afterMenuItemLabelled
     "Returns menu item label after which will be placed 
-    new menu item with generators or refactorings"
-
-    ^ afterMenuItemLabeled
+     new menu item with generators or refactorings"
+    
+    ^ afterMenuItemLabelled
 
     "Modified (comment): / 28-12-2014 / 23:22:55 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 !
 
-afterMenuItemLabeled: aLabel
+afterMenuItemLabelled:aLabel 
     "see afterMenuItemLabeled"
-
-    afterMenuItemLabeled := aLabel
+    
+    afterMenuItemLabelled := aLabel
 
     "Modified (comment): / 28-12-2014 / 23:20:31 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 !
@@ -209,7 +209,7 @@
         item submenuChannel: submenuChannel.
         self 
             placeMenuItem: item 
-            afterMenuItemLabeled: afterMenuItemLabeled 
+            afterMenuItemLabeled: afterMenuItemLabelled 
             forMenu: menu 
     ]
 
--- a/CustomMenuBuilderTests.st	Mon Dec 29 10:42:55 2014 +0100
+++ b/CustomMenuBuilderTests.st	Sun Jan 04 15:29:46 2015 +0100
@@ -186,7 +186,7 @@
         perspective: CustomPerspective classPerspective;
         menu: menu;
         submenuLabel: 'BunchOfGenerators';
-        afterMenuItemLabeled: 'Label_02';
+        afterMenuItemLabelled: 'Label_02';
         generatorOrRefactoringFilter: [ :generatorOrRefactoring | generatorOrRefactoring label ~= 'Generator_02' ];
         navigationState: navigationState;
         resources: resources;
@@ -201,7 +201,7 @@
     ].
 
     "Created: / 28-12-2014 / 22:48:24 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
-    "Modified: / 29-12-2014 / 10:41:06 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+    "Modified: / 04-01-2015 / 15:08:14 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 !
 
 test_build_menu_two_generators_without_filter
@@ -232,7 +232,7 @@
         perspective: CustomPerspective classPerspective;
         menu: menu;
         submenuLabel: 'BunchOfGenerators';
-        afterMenuItemLabeled: 'Label_02';
+        afterMenuItemLabelled: 'Label_02';
         navigationState: navigationState;
         resources: resources;
         buildMenu.    
@@ -246,7 +246,7 @@
     ].
 
     "Created: / 29-12-2014 / 09:33:20 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
-    "Modified: / 29-12-2014 / 10:40:19 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+    "Modified: / 04-01-2015 / 15:08:20 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 !
 
 test_groups_sort_block
--- a/extensions.st	Mon Dec 29 10:42:55 2014 +0100
+++ b/extensions.st	Sun Jan 04 15:29:46 2015 +0100
@@ -828,12 +828,12 @@
         perspective: CustomPerspective classPerspective;
         menu: aMenu;
         submenuLabel: 'Generate - Custom';
-        afterMenuItemLabeled: 'Generate';
+        afterMenuItemLabelled: 'Generate';
         generatorOrRefactoringFilter: [ :generatorOrRefactoring | generatorOrRefactoring isCustomCodeGenerator ];
         buildMenu.
 
     "Created: / 26-08-2014 / 10:21:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 29-12-2014 / 00:06:42 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+    "Modified: / 04-01-2015 / 15:08:25 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 ! !
 
 !Tools::NewSystemBrowser methodsFor:'menus extensions-custom refactorings'!
@@ -845,12 +845,12 @@
         perspective: CustomPerspective classPerspective;
         menu: aMenu;
         submenuLabel: 'Refactor - Custom';
-        afterMenuItemLabeled: 'Generate';
+        afterMenuItemLabelled: 'Generate';
         generatorOrRefactoringFilter: [ :generatorOrRefactoring | generatorOrRefactoring isCustomRefactoring ];
         buildMenu.
 
     "Created: / 08-11-2014 / 21:24:45 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
-    "Modified: / 29-12-2014 / 09:12:08 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+    "Modified: / 04-01-2015 / 15:08:31 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 ! !
 
 !Tools::NewSystemBrowser methodsFor:'menus extensions-custom refactorings'!
@@ -911,12 +911,12 @@
         perspective: CustomPerspective codeViewPerspective;
         menu: aMenu;
         submenuLabel: 'Refactor - Custom';
-        afterMenuItemLabeled: 'Refactor';
+        afterMenuItemLabelled: 'Refactor';
         generatorOrRefactoringFilter: [ :generatorOrRefactoring | generatorOrRefactoring isCustomRefactoring ];
         buildMenu.
 
     "Created: / 26-08-2014 / 22:44:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 29-12-2014 / 09:14:45 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+    "Modified: / 04-01-2015 / 15:08:36 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 ! !
 
 !Tools::NewSystemBrowser methodsFor:'menus extensions-custom refactorings'!
@@ -941,13 +941,13 @@
         perspective: CustomPerspective methodPerspective;
         menu: aMenu;
         submenuLabel: 'Generate - Custom';
-        afterMenuItemLabeled: 'Generate';
+        afterMenuItemLabelled: 'Generate';
         generatorOrRefactoringFilter: [ :generatorOrRefactoring | generatorOrRefactoring isCustomCodeGenerator ];
         buildMenu.
 
     "Created: / 26-08-2014 / 10:18:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 05-09-2014 / 11:28:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 29-12-2014 / 09:23:27 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+    "Modified: / 04-01-2015 / 15:08:40 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 ! !
 
 !Tools::NewSystemBrowser methodsFor:'menus extensions-custom refactorings'!
@@ -959,13 +959,13 @@
         perspective: CustomPerspective methodPerspective;
         menu: aMenu;
         submenuLabel: 'Refactor - Custom';
-        afterMenuItemLabeled: 'Refactor';
+        afterMenuItemLabelled: 'Refactor';
         generatorOrRefactoringFilter: [ :generatorOrRefactoring | generatorOrRefactoring isCustomRefactoring ];
         buildMenu.
 
     "Created: / 24-08-2014 / 15:23:49 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
     "Modified: / 05-09-2014 / 11:28:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 29-12-2014 / 09:28:14 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+    "Modified: / 04-01-2015 / 15:08:46 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 ! !
 
 !Tools::NewSystemBrowser methodsFor:'menus extensions-custom refactorings'!
@@ -977,11 +977,11 @@
         perspective: CustomPerspective instanceVariablePerspective;
         menu: aMenu;
         submenuLabel: 'Generate - Custom';
-        afterMenuItemLabeled: 'Generate';
+        afterMenuItemLabelled: 'Generate';
         buildMenu.
 
     "Created: / 26-08-2014 / 10:21:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 29-12-2014 / 09:31:07 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+    "Modified: / 04-01-2015 / 15:08:52 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 ! !
 
 !jn_refactoring_custom class methodsFor:'documentation'!
--- a/patches/patches.rc	Mon Dec 29 10:42:55 2014 +0100
+++ b/patches/patches.rc	Sun Jan 04 15:29:46 2015 +0100
@@ -25,7 +25,7 @@
       VALUE "LegalCopyright", "My CopyRight or CopyLeft\0"
       VALUE "ProductName", "LibraryName\0"
       VALUE "ProductVersion", "6.2.5.1478\0"
-      VALUE "ProductDate", "Mon, 29 Dec 2014 08:52:43 GMT\0"
+      VALUE "ProductDate", "Sun, 04 Jan 2015 14:26:50 GMT\0"
     END
 
   END
--- a/refactoring_custom.rc	Mon Dec 29 10:42:55 2014 +0100
+++ b/refactoring_custom.rc	Sun Jan 04 15:29:46 2015 +0100
@@ -25,7 +25,7 @@
       VALUE "LegalCopyright", "My CopyRight or CopyLeft\0"
       VALUE "ProductName", "ProductName\0"
       VALUE "ProductVersion", "6.2.5.1478\0"
-      VALUE "ProductDate", "Mon, 29 Dec 2014 08:52:41 GMT\0"
+      VALUE "ProductDate", "Sun, 04 Jan 2015 14:26:49 GMT\0"
     END
 
   END