From bd42784f5eceec7d876b4fdca67b24a08f1ef23a Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Mon, 28 Jun 2021 17:16:37 +0530
Subject: ccwl: Fix indentation.

* ccwl/skribilo.scm (sexp-file-lines): Fix indentation.
---
 ccwl/skribilo.scm | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/ccwl/skribilo.scm b/ccwl/skribilo.scm
index 0c08a31..3420ba8 100644
--- a/ccwl/skribilo.scm
+++ b/ccwl/skribilo.scm
@@ -98,14 +98,14 @@ are found, error out."
                (substring str 0 position)))
 
 (define (sexp-file-lines file regexp)
-    "Return (START . END) where START is the start of the match to
+  "Return (START . END) where START is the start of the match to
 REGEXP in STR and END is the end of the sexp beginning at START. START
 and END are line numbers indexed from 1."
-    (let ((str (call-with-input-file file get-string-all)))
-      (match (sexp-position str regexp)
-        ((start . end)
-         (cons (position->line-number str start)
-               (position->line-number str end))))))
+  (let ((str (call-with-input-file file get-string-all)))
+    (match (sexp-position str regexp)
+      ((start . end)
+       (cons (position->line-number str start)
+             (position->line-number str end))))))
 
 (define (source-ref file regexp text)
   (call-with-input-file file
-- 
cgit v1.2.3