# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1317866062 14400
# Node ID 9a3a49acb6e057a00e6e933d40769fbf36679552
# Parent  9275d33bd224b862d2f274ffb7fb5fd218c2b1eb
Check searches.

diff -r 9275d33bd224 -r 9a3a49acb6e0 src/newseasons/views/main.clj
--- a/src/newseasons/views/main.clj	Wed Oct 05 21:50:06 2011 -0400
+++ b/src/newseasons/views/main.clj	Wed Oct 05 21:54:22 2011 -0400
@@ -100,9 +100,12 @@
 ; Search ----------------------------------------------------------------------
 (defpage [:get "/search"] {:keys [query]}
   (login-required
-    (let [results (unique-shows (itunes-search-show query))]
-      (shows/store-raw-shows results)
-      (t/search query results))))
+    (if (empty? query)
+      (do (flash! "Please enter something to search for.")
+        (resp/redirect "/")) 
+      (let [results (unique-shows (itunes-search-show query))]
+        (shows/store-raw-shows results)
+        (t/search query results)))))
 
 
 ; Add -------------------------------------------------------------------------