From 6e10522fae18e13de45e32d3a12711970ab713ad Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@hornquist.se>
Date: Tue, 12 Nov 2019 17:31:55 +0100
Subject: Re-add move X-HNH-FILENAME from VCALENDAR to VEVENT.

---
 module/vcomponent/parse.scm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'module')

diff --git a/module/vcomponent/parse.scm b/module/vcomponent/parse.scm
index 288ba852..effc51c1 100644
--- a/module/vcomponent/parse.scm
+++ b/module/vcomponent/parse.scm
@@ -281,6 +281,8 @@ row ~a	column ~a	ctx = ~a
                 ;; to a recurrence rule.
                 (for child in (children item)
                      (assert (memv (type child) '(VTIMEZONE VEVENT)))
+                     (set! (attr child 'X-HNH-FILENAME)
+                       (attr (parent child) 'X-HNH-FILENAME))
                      (add-child! calendar child))
                 calendar)
               (make-vcomponent)
-- 
cgit v1.2.3