Merge pull request #2 from metabase/ag-logging

basic scaffolding for logging setup.

project.clj

@@ -6,6 +6,11 @@
   :min-lein-version "2.0.0"
   :dependencies [[org.clojure/clojure "1.6.0"]
                  [environ "0.5.0"]                              ; easy environment management
+                 [org.clojure/tools.logging "0.3.1"]            ; logging framework
+                 [log4j/log4j "1.2.17" :exclusions [javax.mail/mail
+                                                    javax.jms/jms
+                                                    com.sun.jdmk/jmxtools
+                                                    com.sun.jmx/jmxri]]
                  [korma "0.4.0"]                                ; SQL lib
                  ]
   :plugins [[lein-environ "0.5.0"]
@@ -14,5 +19,6 @@
             ]
   :main ^:skip-aot metabase.core
   :target-path "target/%s"
-  :profiles {:dev {:dependencies [[midje "1.6.3"]]}
+  :profiles {:dev {:dependencies [[midje "1.6.3"]]
+                   :jvm-opts ["-Dlogfile.path=target/log"]}
              :uberjar {:aot :all}})

resources/log4j.properties

+log4j.rootLogger=INFO, corvus
+log4j.appender.corvus=org.apache.log4j.RollingFileAppender
+log4j.appender.corvus.File=${logfile.path}/corvus.log
+log4j.appender.corvus.MaxFileSize=500MB
+log4j.appender.corvus.MaxBackupIndex=2
+log4j.appender.corvus.layout=org.apache.log4j.PatternLayout
+log4j.appender.corvus.layout.ConversionPattern=%d [%t] %-5p%c - %m%n
\ No newline at end of file

src/metabase/core.clj

 (ns metabase.core
-  (:gen-class))
+  (:gen-class)
+  (:require [clojure.tools.logging :as log]))
 
 (defn -main
   "I don't do a whole lot ... yet."
   [& args]
-  (println "Hello, World!"))
+  (println "Hello, World!")
+  (log/info "testing logging"))
 
 (defn first-element [sequence default]
   (if (nil? sequence)

test/metabase/core_test.clj

 (ns metabase.core-test
   (:use midje.sweet)
-  (:use [metabase.core]))
+  (:use [metabase.core])
+  (:require [clojure.tools.logging :as log]))
 
 (println "You should expect to see three failures below.")
+(log/info "testing out this logging")
 
 (facts "about `first-element`"
   (fact "it normally returns the first element"