--- a/DeviceGraphicsContext.st Thu Jan 29 12:57:12 1998 +0100
+++ b/DeviceGraphicsContext.st Thu Jan 29 13:12:42 1998 +0100
@@ -79,8 +79,10 @@
initialize
Lobby isNil ifTrue:[
- Lobby := Registry new.
+ Lobby := Registry new.
]
+
+ "Modified: / 29.1.1998 / 12:56:12 / cg"
! !
!DeviceGraphicsContext class methodsFor:'instance creation'!
@@ -3456,8 +3458,11 @@
gcId notNil ifTrue:[^ self].
drawableId isNil ifTrue:[
- self error:'drawing attempt on closed drawable'.
- ^ self
+ "/
+ "/ the drawable has been closed (or was never open)
+ "/ no drawing is possible.
+ "/
+ ^ DrawingOnClosedDrawableSignal raiseRequest
].
self createGC.
@@ -3535,7 +3540,7 @@
"/ device setFont:id in:gcId
"/ ]
- "Modified: 24.4.1997 / 12:00:14 / cg"
+ "Modified: / 29.1.1998 / 12:55:24 / cg"
!
initialize
@@ -3760,6 +3765,6 @@
!DeviceGraphicsContext class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/DeviceGraphicsContext.st,v 1.54 1998-01-27 18:57:31 tz Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/DeviceGraphicsContext.st,v 1.55 1998-01-29 12:12:42 cg Exp $'
! !
DeviceGraphicsContext initialize!