...

src/edu/unl/abbot/cli.clj

@@ -8,7 +8,7 @@
 ;;; for the Center for Digital Research in the Humanities at the
 ;;; University of Nebraska-Lincoln.
 ;;;
-;;; Last Modified: Mon Aug 06 17:13:01 CDT 2012
+;;; Last Modified: Mon Aug 06 17:39:27 CDT 2012
 ;;;
 ;;; Copyright © 2011-2012 Board of Regents of the University of Nebraska-
 ;;; Lincoln (and others).  See COPYING for details.
@@ -19,12 +19,12 @@
 ;;; for more details.
 
 (ns edu.unl.abbot.cli
+  (:import
+    (java.io File)) 
 	(:use edu.unl.abbot.core)
   (:use edu.unl.abbot.stylesheets)
   (:use edu.unl.abbot.utils)
-  (import
-    (java.io File)) 
-		(:gen-class))
+	(:gen-class))
 
 (require '[clojure.tools.cli :as c])
 

src/edu/unl/abbot/core.clj

@@ -8,7 +8,7 @@
 ;;; for the Center for Digital Research in the Humanities at the
 ;;; University of Nebraska-Lincoln.
 ;;;
-;;; Last Modified: Mon Aug 06 17:13:16 CDT 2012
+;;; Last Modified: Mon Aug 06 17:39:32 CDT 2012
 ;;;
 ;;; Copyright © 2011-2012 Board of Regents of the University of Nebraska-
 ;;; Lincoln (and others).  See COPYING for details.
@@ -19,12 +19,12 @@
 ;;; for more details.
 
 (ns edu.unl.abbot.core
+  (:import
+    (java.io File)) 
   (:use edu.unl.abbot.stylesheets)
   (:use edu.unl.abbot.utils)
 	(:use clojure.java.io)
-  (import
-    (java.io File)) 
-		(:gen-class))
+	(:gen-class))
 
 (defn input-files [input-dir]
   "Read input file and do some basic sanity checking."

src/edu/unl/abbot/stylesheets.clj

@@ -29,12 +29,12 @@
 	(:require [clojure.java.io :as io]))
 
 (defn create-meta-stylesheet [custom]
-	(let [meta-url "http://abbot.unl.edu/metaStylesheetForRNGschemas.xsl"]
-				;meta-input (java.io.StringReader. (slurp meta-url))
-				;custom-input (java.io.InputStreamReader. (java.io.FileInputStream. custom) "UTF-8")
-				;meta-map (parse meta-input)
-	      ;custom-map (parse custom-input)]
-		;(.close custom-input)
+	(let [meta-url "http://abbot.unl.edu/metaStylesheetForRNGschemas.xsl"
+				meta-input (java.io.StringReader. (slurp meta-url))
+				custom-input (java.io.InputStreamReader. (java.io.FileInputStream. custom) "UTF-8")
+				meta-map (parse meta-input)
+	      custom-map (parse custom-input)]
+		(.close custom-input)
 		(fn [x] ((sax/compile-xslt (java.net.URL. meta-url)) x))))
 
 ;; Creates the conversion stylesheet (the XSLT that does the actual

src/edu/unl/abbot/utils.clj

@@ -19,7 +19,7 @@
 ;;; for more details.
 
 (ns edu.unl.abbot.utils
-	(import
+	(:import
 		(java.io File)))
 
 (def version "0.4.8")