From d32249280579d0ec11a57b40a49b3389ca887847 Mon Sep 17 00:00:00 2001 From: Scott Ostler Date: Tue, 22 Feb 2011 22:43:12 -0500 Subject: Remove unused ttl-memoize --- src/site.clj | 6 ------ 1 file changed, 6 deletions(-) (limited to 'src/site.clj') diff --git a/src/site.clj b/src/site.clj index 6fce880..beb8a73 100644 --- a/src/site.clj +++ b/src/site.clj @@ -459,12 +459,6 @@ WHERE user_id IN (assoc (stringify-and-escape entry) "score_ent" (score-to-entity (:score entry)))) - -(def directory-cache-ttl (minutes 10)) -(def memoized-lookup-recent-posts-tagless - (ttl-memoize lookup-recent-posts-tagless directory-cache-ttl)) - - (defn add-recent-posts [user-id users] (if-not (empty? users) (let [res (if user-id -- cgit v1.2.3-70-g09d2