mask access
authorClaus Gittinger <cg@exept.de>
Fri, 21 Jun 1996 13:35:12 +0200
changeset 897 ad8ff0206343
parent 896 26cea84f134d
child 898 677e010d0cf8
mask access
Form.st
--- a/Form.st	Fri Jun 21 13:33:37 1996 +0200
+++ b/Form.st	Fri Jun 21 13:35:12 1996 +0200
@@ -811,6 +811,14 @@
     data := nil
 !
 
+mask
+    "for compatibility with images; forms have no mask/alpha channel"
+
+    ^ nil
+
+    "Created: 21.6.1996 / 12:52:42 / cg"
+!
+
 photometric
     "for compatibility with Image class ..."
 
@@ -1563,6 +1571,6 @@
 !Form class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Form.st,v 1.55 1996-06-18 15:11:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Form.st,v 1.56 1996-06-21 11:35:12 cg Exp $'
 ! !
 Form initialize!