From 73cf8eeb8a90749df961a3a4d0e3940205474424 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Sat, 20 Apr 2019 21:43:29 +0200 Subject: Remove remaining export's. --- module/vcalendar.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'module/vcalendar.scm') diff --git a/module/vcalendar.scm b/module/vcalendar.scm index 433c0a19..829fdf3f 100644 --- a/module/vcalendar.scm +++ b/module/vcalendar.scm @@ -7,6 +7,7 @@ #:use-module (srfi srfi-19) #:use-module (srfi srfi-19 util) #:use-module (srfi srfi-26) + #:use-module ((ice-9 optargs) #:select (define*-public)) #:use-module (util) #:export (make-vcomponent) #:re-export (repeating?)) @@ -53,12 +54,11 @@ (filter (lambda (e) (eqv? t (type e))) lst)) -(define* (children component #:optional only-type) +(define*-public (children component #:optional only-type) (let ((childs (%vcomponent-children component))) (if only-type (type-filter only-type childs) childs))) -(export children) (define (get-attr component attr) (%vcomponent-get-attribute -- cgit v1.2.3