From 7de8607b0e7cb440eea54df0fb7f81784ab93987 Mon Sep 17 00:00:00 2001
From: cos <cos>
Date: Sun, 22 Jan 2017 11:08:05 +0100
Subject: calcurse-caldav: List components in calendar-query filter

Required to gain interoperability with SOGo version 3.2.4. When excluded, the
multistatus response from SOGo is empty.
---
 contrib/caldav/calcurse-caldav.py | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/contrib/caldav/calcurse-caldav.py b/contrib/caldav/calcurse-caldav.py
index 5c028bf..9689831 100755
--- a/contrib/caldav/calcurse-caldav.py
+++ b/contrib/caldav/calcurse-caldav.py
@@ -149,8 +149,12 @@ def get_etags(conn, hrefs=[]):
         body = ('<?xml version="1.0" encoding="utf-8" ?>'
                 '<C:calendar-query xmlns:D="DAV:" '
                 '                  xmlns:C="urn:ietf:params:xml:ns:caldav">'
-                '<D:prop><D:getetag /></D:prop>'
-                '<C:filter><C:comp-filter name="VCALENDAR" /></C:filter>'
+                '<D:prop><D:getetag/></D:prop>'
+                '<C:filter><C:comp-filter name="VCALENDAR">'
+                '<C:comp-filter name="VEVENT"/><C:comp-filter name="VALARM"/>'
+                '<C:comp-filter name="VJOURNAL"/><C:comp-filter name="VTODO"/>'
+                '<C:comp-filter name="VFREEBUSY"/>'
+                '<C:comp-filter name="VTIMEZONE"/></C:comp-filter></C:filter>'
                 '</C:calendar-query>')
     headers, body = remote_query(conn, "REPORT", path, {}, body)
     if not headers:
-- 
cgit v1.2.3