From c100184e729165fd7ddb1e3df812d58e6f7a8789 Mon Sep 17 00:00:00 2001
From: Ben Mabey <ben@benmabey.com>
Date: Fri, 29 Oct 2010 18:00:27 -0600
Subject: [PATCH] switches out custom code with doto macro

---
 src/clj_ml/filters.clj | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/src/clj_ml/filters.clj b/src/clj_ml/filters.clj
index 1c04ed2..3a21326 100644
--- a/src/clj_ml/filters.clj
+++ b/src/clj_ml/filters.clj
@@ -97,12 +97,9 @@
 
 (defmacro #^{:skip-wiki true}
   make-filter-m [kind options filter-class]
-  `(let [filter# (new ~filter-class)
-         dataset-format# (get ~options :dataset-format)
-         opts# (into-array String (make-filter-options ~kind ~options))]
-     (.setOptions filter# opts#)
-     (.setInputFormat filter# dataset-format#)
-     filter#))
+  `(doto (new ~filter-class)
+     (.setOptions (into-array String (make-filter-options ~kind ~options)))
+     (.setInputFormat (:dataset-format ~options))))
 
 (defmulti make-filter
   "Creates a filter for the provided attributes format. The first argument must be a symbol