--- a/ToolApplicationModel.st Sat Feb 14 18:48:41 1998 +0100
+++ b/ToolApplicationModel.st Sat Feb 14 20:43:52 1998 +0100
@@ -244,15 +244,6 @@
!ToolApplicationModel class methodsFor:'interface specs'!
windowSpecForCommit
- "this window spec was automatically generated by the ST/X UIPainter"
-
- "do not manually edit this - the painter/builder may not be able to
- handle the specification if its corrupted."
-
- "
- UIPainter new openOnClass:ToolApplicationModel andSelector:#windowSpecForCommit
- ToolApplicationModel new openInterface:#windowSpecForCommit
- "
<resource: #canvas>
@@ -261,9 +252,7 @@
#(#FullSpec
#'window:'
#(#WindowSpec
- #'name:' 'unnamed canvas'
#'layout:' #(#LayoutFrame 343 0 328 0 642 0 387 0)
- #'label:' 'unnamed canvas'
#'min:' #(#Point 100 22)
#'max:' #(#Point 1152 900)
#'bounds:' #(#Rectangle 343 328 643 388)
@@ -297,15 +286,6 @@
!
windowSpecForCommitWithoutChannels
- "this window spec was automatically generated by the ST/X UIPainter"
-
- "do not manually edit this - the painter/builder may not be able to
- handle the specification if its corrupted."
-
- "
- UIPainter new openOnClass:ToolApplicationModel andSelector:#windowSpecForCommitWithoutChannels
- ToolApplicationModel new openInterface:#windowSpecForCommitWithoutChannels
- "
<resource: #canvas>
@@ -314,9 +294,7 @@
#(#FullSpec
#'window:'
#(#WindowSpec
- #'name:' 'unnamed canvas'
#'layout:' #(#LayoutFrame 343 0 328 0 642 0 387 0)
- #'label:' 'unnamed canvas'
#'min:' #(#Point 100 22)
#'max:' #(#Point 1152 900)
#'bounds:' #(#Rectangle 343 328 643 388)
@@ -348,15 +326,6 @@
!
windowSpecForInfoBar
- "this window spec was automatically generated by the ST/X UIPainter"
-
- "do not manually edit this - the painter/builder may not be able to
- handle the specification if its corrupted."
-
- "
- UIPainter new openOnClass:ToolApplicationModel andSelector:#windowSpecForInfoBar
- ToolApplicationModel new openInterface:#windowSpecForInfoBar
- "
<resource: #canvas>
@@ -365,9 +334,7 @@
#(#FullSpec
#'window:'
#(#WindowSpec
- #'name:' 'Image Editor'
#'layout:' #(#LayoutFrame 366 0 355 0 865 0 700 0)
- #'label:' 'Image Editor'
#'min:' #(#Point 400 320)
#'max:' #(#Point 1152 900)
#'bounds:' #(#Rectangle 366 355 866 701)
@@ -401,15 +368,6 @@
!
windowSpecForInfoBarWithClock
- "this window spec was automatically generated by the ST/X UIPainter"
-
- "do not manually edit this - the painter/builder may not be able to
- handle the specification if its corrupted."
-
- "
- UIPainter new openOnClass:ToolApplicationModel andSelector:#windowSpecForInfoBarWithClock
- ToolApplicationModel new openInterface:#windowSpecForInfoBarWithClock
- "
<resource: #canvas>
@@ -418,9 +376,7 @@
#(#FullSpec
#'window:'
#(#WindowSpec
- #'name:' 'Image Editor'
#'layout:' #(#LayoutFrame 349 0 227 0 848 0 572 0)
- #'label:' 'Image Editor'
#'min:' #(#Point 400 320)
#'max:' #(#Point 1152 900)
#'bounds:' #(#Rectangle 349 227 849 573)
@@ -903,6 +859,11 @@
!ToolApplicationModel methodsFor:'clipboard'!
+clipboard
+
+ ^self class clipboard
+!
+
clipboard: anEditObject
self class clipboard: anEditObject.
@@ -1141,5 +1102,5 @@
!ToolApplicationModel class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.38 1998-02-07 15:57:39 tz Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.39 1998-02-14 19:43:52 tz Exp $'
! !