-(use-modules (ice-9 regex))
+(use-modules (ice-9 regex)
+ (srfi srfi-1))
;; should make module?
(string-append
"<" (symbol->string tag)
(apply string-append
- (map dump-attr (filter-list candidate? attrs)))
+ (map dump-attr (filter candidate? attrs)))
">\n")
)