From e5322e2beb929d43b47bb7d899be5e0bddd6a49e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Fri, 29 Mar 2019 15:39:10 +0100
Subject: Minor whitespace fixup.

---
 module/main.scm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'module/main.scm')

diff --git a/module/main.scm b/module/main.scm
index 769796c5..e7766b8e 100755
--- a/module/main.scm
+++ b/module/main.scm
@@ -131,14 +131,13 @@
 (load "config.scm")
 
 (define (main args)
-
   (define calendars (map make-vcomponent calendar-files))
   (define events (concatenate (map (cut children <> 'VEVENT) calendars)))
 
   (let* ((repeating regular (partition repeating? events)))
 
     (set! repeating (sort*! repeating time<? (extract 'DTSTART)))
-    (set! regular (sort*! regular   time<? (extract 'DTSTART)))
+    (set! regular   (sort*! regular   time<? (extract 'DTSTART)))
 
     (let ((repeating (interleave-streams ev-time<?
                       (map generate-recurrence-set repeating))))
-- 
cgit v1.2.3