From e3f51382e6453c1068da6a11b9b4d83ec04c7e90 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Sun, 15 Apr 2018 01:15:53 -0700
Subject: [PATCH] Tweak indentation.

---
 src/runtime/srfi-1.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/runtime/srfi-1.scm b/src/runtime/srfi-1.scm
index c07a7d4d4..98d9e8fe0 100644
--- a/src/runtime/srfi-1.scm
+++ b/src/runtime/srfi-1.scm
@@ -703,7 +703,8 @@ USA.
 (define (find-tail pred list)
   (let lp ((list list))
     (and (not (null-list? list 'find-tail))
-	 (if (pred (car list)) list
+	 (if (pred (car list))
+	     list
 	     (lp (cdr list))))))
 
 (define (take-while pred lis)
-- 
2.25.1