--- a/DMedium.st	Mon Feb 06 01:30:10 1995 +0100
+++ b/DMedium.st	Mon Feb 06 01:38:04 1995 +0100
@@ -22,7 +22,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libview/Attic/DMedium.st,v 1.8 1994-11-17 14:24:54 claus Exp $
+$Header: /cvs/stx/stx/libview/Attic/DMedium.st,v 1.9 1995-02-06 00:35:42 claus Exp $
 '!
 
 !DisplayMedium class methodsFor:'documentation'!
@@ -43,7 +43,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libview/Attic/DMedium.st,v 1.8 1994-11-17 14:24:54 claus Exp $
+$Header: /cvs/stx/stx/libview/Attic/DMedium.st,v 1.9 1995-02-06 00:35:42 claus Exp $
 "
 !
 
@@ -74,6 +74,12 @@
 
 !DisplayMedium methodsFor:'accessing'!
 
+isView
+    "return true, if the receiver is a view"
+
+    ^ false
+!
+
 origin
     "return the origin i.e. coordinate of top-left of the receiver"
 
@@ -137,6 +143,13 @@
     height := h
 !
 
+setWidth:w height:h
+    "set both width and height - not to be redefined"
+
+    width := w.
+    height := h
+!
+
 insideWidth
     "return the usable width for drawing in the receiver;
      this is width here, but Views/Pages may subtract margins"