steffen: server/kolab-resource-handlers/kolab-resource-handlers/resmgr resmgr.php, 1.50, 1.51

[cvs at intevation.de]

Author: steffen

Update of /kolabrepository/server/kolab-resource-handlers/kolab-resource-handlers/resmgr
In directory doto:/tmp/cvs-serv26872/kolab-resource-handlers/kolab-resource-handlers/resmgr

Modified Files:
	resmgr.php 
Log Message:
Fix for Issue502 (alarms)

Index: resmgr.php
===================================================================
RCS file: /kolabrepository/server/kolab-resource-handlers/kolab-resource-handlers/resmgr/resmgr.php,v
retrieving revision 1.50
retrieving revision 1.51
diff -u -d -r1.50 -r1.51
--- resmgr.php	15 Nov 2004 13:45:55 -0000	1.50
+++ resmgr.php	15 Nov 2004 23:59:38 -0000	1.51
@@ -759,6 +759,24 @@
       }
     }
 
+    // Alarm
+    $valarm = $itip->findComponent('VALARM');
+    if( $valarm ) {
+      $trigger = $valarm->getAttribute('TRIGGER');
+      if( !PEAR::isError($trigger) ) {
+	$p = $valarm->getAttribute('TRIGGER',true);
+	if( $trigger < 0 ) {
+	    // All OK, enter the alarm into the XML
+	    // NOTE: The Kolab XML format seems underspecified
+	    // wrt. alarms currently...
+	    $kolab_node = $kolab_event->append_child($kolab_xml->create_element('alarm'));
+	    $kolab_node->append_child($kolab_xml->create_text_node((int)(-$trigger/60)));
+	}
+      } else {
+	myLog('No TRIGGER in VALARM', RM_LOG_DEBUG);	
+      }
+    }
+
     // Recurrence
     $rrule_str = $itip->getAttribute('RRULE');
     if( !is_a( $rrule_str, 'PEAR_Error' ) ) {