* cleanup project file and use reasonable values.

* fix up our namespacing to be based off of "metabase".
* add midje to the app for unit testing.

project.clj

-(defproject metabase-init "0.1.0-SNAPSHOT"
-  :description "FIXME: write description"
-  :url "http://example.com/FIXME"
+(defproject metabase "metabase-0.1.0-SNAPSHOT"
+  :description "Metabase Community Edition"
+  :url "http://metabase.com/"
   :license {:name "Eclipse Public License"
             :url "http://www.eclipse.org/legal/epl-v10.html"}
-  :dependencies [[org.clojure/clojure "1.6.0"]]
-  :main ^:skip-aot metabase-init.core
+  :min-lein-version "2.0.0"
+  :dependencies [[org.clojure/clojure "1.6.0"]
+                 [environ "0.5.0"]                              ; easy environment management
+                 [korma "0.4.0"]                                ; SQL lib
+                 ]
+  :plugins [[lein-environ "0.5.0"]
+            [lein-midje "3.1.3"]
+            [cider/cider-nrepl "0.8.2"]                         ; for development w/ Emacs
+            ]
+  :main ^:skip-aot metabase.core
   :target-path "target/%s"
-  :profiles {:uberjar {:aot :all}})
+  :profiles {:dev {:dependencies [[midje "1.6.3"]]}
+             :uberjar {:aot :all}})

src/metabase_init/core.clj → src/metabase/core.clj

-(ns metabase-init.core
+(ns metabase.core
   (:gen-class))
 
 (defn -main
   "I don't do a whole lot ... yet."
   [& args]
   (println "Hello, World!"))
+
+(defn first-element [sequence default]
+  (if (nil? sequence)
+    default
+    (first sequence)))
\ No newline at end of file

test/metabase/core_test.clj

+(ns metabase.core-test
+  (:use midje.sweet)
+  (:use [metabase.core]))
+
+(println "You should expect to see three failures below.")
+
+(facts "about `first-element`"
+  (fact "it normally returns the first element"
+    (first-element [1 2 3] :default) => 1
+    (first-element '(1 2 3) :default) => 1)
+
+  ;; I'm a little unsure how Clojure types map onto the Lisp I'm used to.
+  (fact "default value is returned for empty sequences"
+    (first-element [] :default) => :default
+    (first-element '() :default) => :default
+    (first-element nil :default) => :default
+    (first-element (filter even? [1 3 5]) :default) => :default))

test/metabase_init/core_test.clj

-(ns metabase-init.core-test
-  (:require [clojure.test :refer :all]
-            [metabase-init.core :refer :all]))
-
-(deftest a-test
-  (testing "FIXME, I fail."
-    (is (= 0 1))))