Update of /cvsroot/htoolkit/gio/src/Graphics/UI/GIO
In directory sc8-pr-cvs1:/tmp/cvs-serv20774/src/Graphics/UI/GIO
Modified Files:
Controls.hs
Log Message:
Add an instance of Able for DateEntry
Index: Controls.hs
===================================================================
RCS file: /cvsroot/htoolkit/gio/src/Graphics/UI/GIO/Controls.hs,v
retrieving revision 1.42
retrieving revision 1.43
diff -C2 -d -r1.42 -r1.43
*** Controls.hs 25 Nov 2003 14:17:56 -0000 1.42
--- Controls.hs 25 Nov 2003 15:57:48 -0000 1.43
***************
*** 287,290 ****
--- 287,293 ----
return de
+ instance Able DateEntry where
+ enabled = newStdAttr dehandle Port.getControlEnabled Port.setControlEnabled
+
instance Tipped DateEntry where
tooltip = newStdAttr dehandle Port.getControlTip Port.setControlTip
|