Enlightenment CVS committal

Author  : leviathan
Project : e17
Module  : proto

Dir     : e17/proto/etk-perl/lib/Etk


Modified Files:
        Constants.pm 


Log Message:
follow etk changes + fix entry test

===================================================================
RCS file: /cvs/e/e17/proto/etk-perl/lib/Etk/Constants.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -3 -r1.7 -r1.8
--- Constants.pm        6 Sep 2006 19:37:34 -0000       1.7
+++ Constants.pm        20 Oct 2006 19:01:34 -0000      1.8
@@ -54,6 +54,8 @@
    toolbar     => [qw/ToolbarIcons ToolbarText ToolbarBothVert 
ToolbarBothHoriz 
     ToolbarDefault ToolbarHoriz ToolbarVert/],
    button      => [qw/ButtonIcon ButtonText ButtonBothVert ButtonBothHoriz/],
+   shadow      => [qw/ShadowNone ShadowInside ShadowOutside ShadowNoEdge 
ShadowLeft ShadowAll
+    ShadowRight ShadowTop ShadowBottom ShadowLeftRight ShadowTopBottom/],
    );
 
 my @all = ();
@@ -237,6 +239,26 @@
    ButtonBothHoriz => 3
 };
 
+
+#shadow
+use constant {
+   ShadowNone => 0,
+   ShadowInside => 1,
+   ShadowOutside => 2,
+
+   ShadowNoEdge => 0,
+   ShadowLeft => 1 << 0,
+   ShadowRight => 1 << 1,
+   ShadowTop => 1 << 2,
+   ShadowBottom => 1 << 3   
+};
+use constant {
+   ShadowLeftRight => ShadowLeft | ShadowRight,
+   ShadowTopBottom => ShadowTop | ShadowBottom
+};
+use constant {
+   ShadowAll => ShadowLeftRight | ShadowTopBottom
+};
 
 
 



-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
enlightenment-cvs mailing list
enlightenment-cvs@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs

Reply via email to