aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--rent.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/rent.scm b/rent.scm
index 7258c5e..7730c9f 100644
--- a/rent.scm
+++ b/rent.scm
@@ -263,7 +263,8 @@
(house-page-sxml house)
`((td *preorder* . ,(lambda (root . children)
(sxml-match (cons root children)
- ((td (i (@ (class "fa fa-users"))) " " (strong ,maximum-tenants))
+ ((td (span (i (@ (class "fa fa-users"))) " Max Tenants:")
+ " " (strong ,maximum-tenants))
(cons 'result (string->number maximum-tenants)))
(,_ #f))))
(*TOP* . ,handle-top)