 
 ;;; REDUCER METHODS
 
-(defn reducer-reduce [this wkey values-iter output reporter]
-  (debug "Called reduce with key " wkey " and "
-         (count (iterator-seq values-iter)) " values."))
+(defn reducer-configure [this job]
+  (context/use-hadoop-jobconf job))
+
+(def reducer-reduce (partial h/standard-reduce my-reduce))
+
 
 
 




;;; MAPPER METHODS

(defn mapper-configure [this job]

            [org.altlaw.util.jruby :as ruby]
            [org.altlaw.util.context :as context]
            [org.altlaw.util.log :as log]
            [org.altlaw.util.merge-fields :as merge]
            [org.altlaw.db.docids :as ids]
            [org.altlaw.extract.pdf :as pdf]
            [clojure.contrib.walk :as walk]
            [clojure.contrib.singleton :as sing]
            [clojure.set :as set])
  (:use clojure.contrib.json.read
        org.altlaw.util.log)
  (:import (org.altlaw.extract PROHTMLToText)
           (org.apache.commons.codec.binary Base64)
           (javax.script ScriptContext ScriptEngine ScriptEngineManager)
           (java.io StringReader)))

