--- a/MenuEditor.st	Thu Dec 22 18:41:12 2005 +0100
+++ b/MenuEditor.st	Mon Jan 09 09:47:51 2006 +0100
@@ -1142,6 +1142,9 @@
             labelImage: (ResourceRetriever ToolbarIconLibrary newMenuIcon)
           )
          (MenuItem
+            label: '-'
+          )
+         (MenuItem
             activeHelpKey: fileLoad
             label: 'Load'
             itemValue: doLoad
@@ -2187,12 +2190,14 @@
     index := 1.
 
     (intoItem canAddChildren and:[intoItem isExpanded]) ifFalse:[
-        [ intoItem parent canAddChildren ] whileFalse:[
+        intoItem parent notNil ifTrue:[
+            [ intoItem parent canAddChildren ] whileFalse:[
+                intoItem := intoItem parent.
+            ].
+            index := intoItem parent identityIndexOf:intoItem.
+            index := index + 1.
             intoItem := intoItem parent.
         ].
-        index := intoItem parent identityIndexOf:intoItem.
-        index := index + 1.
-        intoItem := intoItem parent.
     ].
     newItem := aBlockOrItem value.