Warn when no Java classes are found

doclet/src/clojure/play_clj_doclet/core.clj

@@ -157,13 +157,15 @@
 (defn save!
   [parsed-files]
   (html/create-site! "site" parsed-files)
-  (html/create-embed! "embed" parsed-files))
+  (html/create-embed! "embed" parsed-files)
+  (println "Created site/ and embed/"))
 
 (defn parse
   [^RootDoc root]
-  (->> (map parse-class (.classes root))
-       (filter some?)
-       (apply concat)
-       parse-clj
-       save!)
-  (println "Created site/ and embed/"))
+  (if (= 0 (count (.classes root)))
+    (println "No Java classes found")
+    (->> (map parse-class (.classes root))
+         (filter some?)
+         (apply concat)
+         parse-clj
+         save!)))

doclet/src/java/play_clj_doclet/core/Start.java

@@ -11,6 +11,6 @@ public class Start {
 		RT.var("clojure.core", "require").invoke(Symbol.intern("play-clj-doclet.core"));
 		Var parse = RT.var("play-clj-doclet.core", "parse");
 		parse.invoke(root);
-        return true;
+		return true;
 	}
 }