aboutsummaryrefslogtreecommitdiff
path: root/module/output/info.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/output/info.scm')
-rw-r--r--module/output/info.scm20
1 files changed, 0 insertions, 20 deletions
diff --git a/module/output/info.scm b/module/output/info.scm
deleted file mode 100644
index eba0979c..00000000
--- a/module/output/info.scm
+++ /dev/null
@@ -1,20 +0,0 @@
-(define-module (output info)
- :use-module (util))
-
-(use-modules (ice-9 getopt-long)
- (vcomponent)
- (vcomponent output)
- (vulgar color)
- (srfi srfi-1))
-
-(define-public (info-main calendars events args)
- (format #t "~%Found ~a calendars, named:~%~{ - [~4@a] ~a~a\x1b[m~%~}~%"
- (length calendars)
- (concatenate
- (zip (map (lambda (c) (length (filter (lambda (e) (eq? 'VEVENT (type e)))
- (children c))))
- calendars)
- (map (compose color-escape (extract 'COLOR)) calendars)
- (map (extract 'NAME) calendars)))))
-
-