From: Chris Hanson <org/chris-hanson/cph>
Date: Sun, 15 Apr 2018 08:15:53 +0000 (-0700)
Subject: Tweak indentation.
X-Git-Tag: mit-scheme-pucked-x11-0.3.1~7^2~131
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=e3f51382e6453c1068da6a11b9b4d83ec04c7e90;p=mit-scheme.git

Tweak indentation.
---

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)