Enlightenment CVS committal
Author : sebastid
Project : e17
Module : apps/e
Dir : e17/apps/e/data/themes
Modified Files:
default_pager.edc
Log Message:
The pager shows which desk a drop is over.
===================================================================
RCS file: /cvsroot/enlightenment/e17/apps/e/data/themes/default_pager.edc,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -3 -r1.14 -r1.15
--- default_pager.edc 1 Apr 2005 08:36:59 -0000 1.14
+++ default_pager.edc 15 May 2005 22:16:00 -0000 1.15
@@ -62,6 +62,12 @@
group {
name: "modules/pager/desk";
+ data {
+ item: "drag" "0";
+ }
+ script {
+ public active;
+ }
parts {
part {
name: "clip";
@@ -133,6 +139,11 @@
inherit: "default" 0.0;
color: 255 255 255 255;
}
+ description {
+ state: "drag" 0.0;
+ inherit: "default" 0.0;
+ color: 255 255 255 164;
+ }
}
part {
name: "items";
@@ -382,6 +393,48 @@
target: "sel";
target: "overlay";
}
+ program {
+ name: "set_active";
+ signal: "active";
+ source: "";
+ script {
+ set_int(active, 1);
+ }
+ }
+ program {
+ name: "set_passive";
+ signal: "passive";
+ source: "";
+ script {
+ set_int(active, 0);
+ }
+ }
+ program {
+ name: "drag_in";
+ signal: "drag";
+ source: "in";
+ action: STATE_SET "drag" 0.0;
+ target: "overlay";
+ }
+ program {
+ name: "drag_out";
+ signal: "drag";
+ source: "out";
+ script {
+ if (get_int(active) == 1)
+ set_state(PART:"overlay", "active", 0.0);
+ else
+ set_state(PART:"overlay", "default", 0.0);
+ }
+ }
+ program {
+ name: "init";
+ signal: "load";
+ source: "";
+ script {
+ set_int(active, 0);
+ }
+ }
}
}
-------------------------------------------------------
This SF.Net email is sponsored by Oracle Space Sweepstakes
Want to be the first software developer in space?
Enter now for the Oracle Space Sweepstakes!
http://ads.osdn.com/?ad_id=7393&alloc_id=16281&op=click
_______________________________________________
enlightenment-cvs mailing list
enlightenment-cvs@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs
