get rid of extra newlines in printed literals

dakrone · Mar 24, 2013 · 7f24f41 · 7f24f41
1 parent 0fa20ee
commit 7f24f41
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/opennlp/sample.clj b/src/opennlp/sample.clj
@@ -7,10 +7,10 @@
   (.write w "#opennlp/sample {")
   (.write w ":category ")
   (binding [*out* w]
-    (prn (.getCategory sample)))
+    (pr (.getCategory sample)))
   (.write w " :text ")
   (binding [*out* w]
-    (prn (vec (.getText sample))))
+    (pr (vec (.getText sample))))
   (.write w "}"))
 
 (defmethod print-method DocumentSample