diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-06-15 19:19:30 +0200 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-06-15 19:19:30 +0200 |
commit | b3301ea20ae6ecb3c6cf353111d982251cbbad72 (patch) | |
tree | 4c728300a52ce8656c812a26a76b65a86b2f4e48 /module/vcomponent/parse/component.scm | |
parent | Minor error cleanup in component. (diff) | |
download | calp-b3301ea20ae6ecb3c6cf353111d982251cbbad72.tar.gz calp-b3301ea20ae6ecb3c6cf353111d982251cbbad72.tar.xz |
Save soruce-prop object to vline.
Diffstat (limited to '')
-rw-r--r-- | module/vcomponent/parse/component.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/module/vcomponent/parse/component.scm b/module/vcomponent/parse/component.scm index b5fcbbe2..6819a202 100644 --- a/module/vcomponent/parse/component.scm +++ b/module/vcomponent/parse/component.scm @@ -281,6 +281,9 @@ (for vline in vlines (define key (vline-key vline)) + (set! (vline-source vline) + (get-metadata head*)) + ;; See RFC 5545 p.53 for list of all repeating types ;; (for vcomponent) (if (memv key '(ATTACH ATTENDEE CATEGORIES |