--- a/UIPainterView.st Thu May 22 13:37:44 1997 +0200
+++ b/UIPainterView.st Thu May 22 13:40:30 1997 +0200
@@ -77,27 +77,28 @@
^ #(#Menu #(
#(#MenuItem
#'label:' 'copy'
- #'nameKey:' #copySelection
+ #'value:' #copySelection
#'shortcutKeyCharacter:' #Copy
)
#(#MenuItem
#'label:' 'cut'
- #'nameKey:' #deleteSelection
+ #'value:' #deleteSelection
#'shortcutKeyCharacter:' #Cut
)
#(#MenuItem
- #'label:' 'paste'
+ #'label:' 'paste'
#'nameKey:' #paste
+ #'value:' #paste
#'submenu:'
#(#Menu #(
#(#MenuItem
#'label:' 'paste'
- #'nameKey:' #pasteBuffer
+ #'value:' #pasteBuffer
#'shortcutKeyCharacter:' #Paste
)
#(#MenuItem
#'label:' 'keep layout'
- #'nameKey:' #pasteWithLayout
+ #'value:' #pasteWithLayout
)
)
nil
@@ -105,20 +106,21 @@
)
)
#(#MenuItem
- #'label:' 'undo'
- #'nameKey:' #undoLast)
+ #'label:' 'undo'
+ #'nameKey:' #undo
+ #'value:' #undoLast)
#(#MenuItem
#'label:' 'arrange'
- #'nameKey:' #arrange
+ #'value:' #arrange
#'submenu:'
#(#Menu #(
#(#MenuItem
#'label:' 'to front'
- #'nameKey:' #raiseSelection
+ #'value:' #raiseSelection
)
#(#MenuItem
#'label:' 'to back'
- #'nameKey:' #lowerSelection
+ #'value:' #lowerSelection
)
)
nil
@@ -127,44 +129,44 @@
)
#(#MenuItem
#'label:' 'dimension'
- #'nameKey:' #dimension
+ #'value:' #dimension
#'submenu:'
#(#Menu #(
#(#MenuItem
#'label:' 'default extent'
- #'nameKey:' #setToDefaultExtent
+ #'value:' #setToDefaultExtent
)
#(#MenuItem
#'label:' 'default width'
- #'nameKey:' #setToDefaultWidth
+ #'value:' #setToDefaultWidth
)
#(#MenuItem
#'label:' 'default height'
- #'nameKey:' #setToDefaultHeight
+ #'value:' #setToDefaultHeight
)
#(#MenuItem
#'label:' 'copy extent'
- #'nameKey:' #copyExtent
+ #'value:' #copyExtent
)
#(#MenuItem
#'label:' 'paste extent'
- #'nameKey:' #pasteExtent
+ #'value:' #pasteExtent
)
#(#MenuItem
#'label:' 'paste width'
- #'nameKey:' #pasteWidth
+ #'value:' #pasteWidth
)
#(#MenuItem
#'label:' 'paste height'
- #'nameKey:' #pasteHeight
+ #'value:' #pasteHeight
)
#(#MenuItem
#'label:' 'copy layout'
- #'nameKey:' #copyLayout
+ #'value:' #copyLayout
)
#(#MenuItem
#'label:' 'paste layout'
- #'nameKey:' #pasteLayout
+ #'value:' #pasteLayout
)
)
#(3 1 3)
@@ -173,52 +175,52 @@
)
#(#MenuItem
#'label:' 'align'
- #'nameKey:' #align
+ #'value:' #align
#'submenu:'
#(#Menu #(
#(#MenuItem
#'label:' 'align left'
- #'nameKey:' #alignSelectionLeft
+ #'value:' #alignSelectionLeft
)
#(#MenuItem
#'label:' 'align right'
- #'nameKey:' #alignSelectionRight
+ #'value:' #alignSelectionRight
)
#(#MenuItem
#'label:' 'align left & right'
- #'nameKey:' #alignSelectionLeftAndRight
+ #'value:' #alignSelectionLeftAndRight
)
#(#MenuItem
#'label:' 'align top'
- #'nameKey:' #alignSelectionTop
+ #'value:' #alignSelectionTop
)
#(#MenuItem
- #'label:' 'align bottom' #'nameKey:'
+ #'label:' 'align bottom' #'value:'
#alignSelectionBottom
)
#(#MenuItem
#'label:' 'align centered vertical'
- #'nameKey:' #alignSelectionCenterHor
+ #'value:' #alignSelectionCenterHor
)
#(#MenuItem
#'label:' 'align centered horizontal'
- #'nameKey:' #alignSelectionCenterVer
+ #'value:' #alignSelectionCenterVer
)
#(#MenuItem
#'label:' 'spread horizontal'
- #'nameKey:' #spreadSelectionHor
+ #'value:' #spreadSelectionHor
)
#(#MenuItem
#'label:' 'spread vertical'
- #'nameKey:' #spreadSelectionVer
+ #'value:' #spreadSelectionVer
)
#(#MenuItem
#'label:' 'center horizontal in frame'
- #'nameKey:' #centerSelectionHor
+ #'value:' #centerSelectionHor
)
#(#MenuItem
#'label:' 'center vertical in frame'
- #'nameKey:' #centerSelectionVer
+ #'value:' #centerSelectionVer
)
)
#(7 2)
@@ -1007,7 +1009,7 @@
ifFalse:[(can and:[self canPasteInto:selection])]
].
- menu enabledAt:#undoLast put:(undoHistory notEmpty).
+ menu enabledAt:#undo put:(undoHistory notEmpty).
^ menu
@@ -1874,7 +1876,6 @@
painter := aPainter.
self addDependent:painter.
-
! !
!UIPainterView::ListHolder methodsFor:'private'!