diff options
| author | Hugo Hörnquist <hugo@hornquist.se> | 2019-03-08 10:12:04 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@hornquist.se> | 2019-03-08 10:12:04 +0100 |
| commit | d89343bf6959e8a0f9bf891a8773daf6b8a9825b (patch) | |
| tree | 1dfe746619bf4b044fcae3eddec6fbcaa081feeb /vcalendar | |
| parent | Remove C hash library. (diff) | |
| download | calp-d89343bf6959e8a0f9bf891a8773daf6b8a9825b.tar.gz calp-d89343bf6959e8a0f9bf891a8773daf6b8a9825b.tar.xz | |
Add copy-vevent.
Diffstat (limited to '')
| -rw-r--r-- | vcalendar.scm | 3 | ||||
| -rw-r--r-- | vcalendar/primitive.scm | 4 |
2 files changed, 4 insertions, 3 deletions
diff --git a/vcalendar.scm b/vcalendar.scm index 603aefea..89dd682b 100644 --- a/vcalendar.scm +++ b/vcalendar.scm @@ -59,5 +59,4 @@ (transformer (attr ev field)))) - - +(define-public copy-vcomponent %vcomponent-shallow-copy) diff --git a/vcalendar/primitive.scm b/vcalendar/primitive.scm index b4ba1f38..e575115c 100644 --- a/vcalendar/primitive.scm +++ b/vcalendar/primitive.scm @@ -12,7 +12,9 @@ %vcomponent-set-attribute! %vcomponent-get-attribute - %vcomponent-attribute-list)) + %vcomponent-attribute-list + + %vcomponent-shallow-copy)) (setenv "LD_LIBRARY_PATH" (dirname (dirname (current-filename)))) (load-extension "libguile-calendar" "init_lib") |