Locked out nil haystacks to avoid NPEs.

spariev · Oct 11, 2009 · e0c836e · e0c836e
1 parent ad14963
commit e0c836e
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/cupboard/utils.clj b/src/cupboard/utils.clj
@@ -72,7 +72,9 @@
 
 
 (defn starts-with [#^String haystack #^String needle]
-  (.startsWith haystack needle))
+  (if-not (nil? haystack)
+    (.startsWith haystack needle)
+    false))
 
 
 (defn flatten [x]