From 5acf7ea3e1d6b0251548bf1b983b397cc958a72e Mon Sep 17 00:00:00 2001
From: Nathaniel Smith <nathanielksmith@gmail.com>
Date: Sun, 28 Dec 2014 18:50:15 -0800
Subject: [PATCH] hmm

---
 scripts/userlist.hy | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/scripts/userlist.hy b/scripts/userlist.hy
index 80f0e02..79a83b5 100644
--- a/scripts/userlist.hy
+++ b/scripts/userlist.hy
@@ -37,8 +37,7 @@
   (apply sorted [usernames] {"key" modify-time}))
 
 (defn user-generator [] (->> (listdir "/home")
-                             (filter (fn [f] (and (not (= f "ubuntu")) (not (= f "poetry")))))
-                             list))
+                             (filter (fn [f] (and (not (= f "ubuntu")) (not (= f "poetry")))))))
 
 (def user-list (->> (user-generator)
                     sort-user-list
@@ -47,6 +46,6 @@
                     (.join "\n")))
 
 (print (.format "our esteemed users ({})<br> <sub>generated at {}</sub><br><ul>{}</ul>"
-                (len (user-generator))
+                (len (list (user-generator)))
                 timestamp
                 user-list))