From b466a96db3ceeddc8f28814309ba1bae9136ccbd Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Tue, 26 Sep 2023 10:23:39 +0100
Subject: Re-indent main expression.

* rent.scm (main): Re-indent.
---
 rent.scm | 23 +++++++++++------------
 1 file changed, 11 insertions(+), 12 deletions(-)

diff --git a/rent.scm b/rent.scm
index 2c806de..238d97c 100644
--- a/rent.scm
+++ b/rent.scm
@@ -421,18 +421,17 @@ Cycling distance: ~,1f km
 ;; Sort the listed houses newest advertisments last.
 (list-houses
  (filter (lambda (house)
-           (and
-            (not (house-bills-included? house))
-            (< (house-hours-live house) 100)
-            (not (house-shared? house))
-            (<= (house-bedrooms house) 1)
-            (>= (house-rent house) 1200)
-            (<= (house-rent house) 1400)
-            (house-unfurnished? house)
-            (house-live? house)
-            (>= (house-maximum-tenants house) 2)
-            (not (null? (house-tube-stations house)))
-            (not (string-contains-ci (house-title house) "bedsit"))))
+           (and (not (house-bills-included? house))
+                (< (house-hours-live house) 100)
+                (not (house-shared? house))
+                (<= (house-bedrooms house) 1)
+                (>= (house-rent house) 1200)
+                (<= (house-rent house) 1400)
+                (house-unfurnished? house)
+                (house-live? house)
+                (>= (house-maximum-tenants house) 2)
+                (not (null? (house-tube-stations house)))
+                (not (string-contains-ci (house-title house) "bedsit"))))
          (sort (all-houses)
                (lambda (house1 house2)
                  (> (house-hours-live house1)
-- 
cgit v1.2.3