From 4c358a778359ad24d0c333fb1dea1366180e7334 Mon Sep 17 00:00:00 2001 From: Nathaniel Smith Date: Sat, 8 Nov 2014 20:16:11 -0500 Subject: [PATCH] fouaishfoh --- scripts/userlist.hy | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/scripts/userlist.hy b/scripts/userlist.hy index 71fcd00..36accdc 100644 --- a/scripts/userlist.hy +++ b/scripts/userlist.hy @@ -31,8 +31,8 @@ (defn sort-user-list [usernames] (apply sorted [usernames] {"key" modify-time})) -(defn user-generator [] (-> (listdir "/home") - (filter (fn [f] (and (not (= f "ubuntu")) (not (= f "poetry"))))))) +(defn user-generator [] (->> (listdir "/home") + (filter (fn [f] (and (not (= f "ubuntu")) (not (= f "poetry"))))))) (def user-list (->> (user-generator) sort-user-list