--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/extensions.st	Sun Jan 26 23:47:27 2014 +0000
@@ -0,0 +1,30 @@
+"{ Package: 'jn:refactoring_custom' }"!
+
+!Tools::NewSystemBrowser methodsFor:'menus extensions-custom refactorings'!
+
+classMenuExtensionCustomRefactorings:aMenu 
+    <menuextension: #classMenu>
+    | item  index  perspective  context |
+
+    item := MenuItem label:(resources string:'Generate - Custom').
+    perspective := CustomPerspective classPerspective.
+    context := CustomContext perspective:perspective
+            state:self navigationState.
+    item submenuChannel:[ CustomMenuBuilder buildMenuForContext:context ].
+    index := aMenu indexOfMenuItemForWhich:[:each | each label = 'Generate' ].
+    index ~~ 0 ifTrue:[
+        aMenu addItem:item beforeIndex:index + 1.
+    ] ifFalse:[
+        aMenu addItem:item.
+    ].
+
+    "Created: / 26-01-2014 / 13:22:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 26-01-2014 / 23:36:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!jn_refactoring_custom class methodsFor:'documentation'!
+
+extensionsVersion_HG
+
+    ^ '$Changeset: <not expanded> $'
+! !