Mercurial > rlm
annotate src/rlm/openmind.clj @ 0:78a630e650d2
initial import
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Tue, 18 Oct 2011 00:57:08 -0700 |
parents | |
children |
rev | line source |
---|---|
rlm@0 | 1 (ns rlm.openmind |
rlm@0 | 2 (:refer-clojure :only []) |
rlm@0 | 3 (:require rlm.ns-rlm rlm.light-base)) |
rlm@0 | 4 (rlm.ns-rlm/ns-clone rlm.light-base) |
rlm@0 | 5 |
rlm@0 | 6 |
rlm@0 | 7 (use 'clojure.contrib.sql) |
rlm@0 | 8 (import 'org.gjt.mm.mysql.Driver) |
rlm@0 | 9 (use 'clojure.contrib.sql) |
rlm@0 | 10 (undef distinct case compile drop take sort) |
rlm@0 | 11 (use 'clojureql.core) |
rlm@0 | 12 (import 'java.io.File) |
rlm@0 | 13 (use '[clojure.java.io :only [copy]]) |
rlm@0 | 14 (use '[clojure.contrib.shell-out :only [sh]]) |
rlm@0 | 15 (use '[clojure.string :only [split]]) |
rlm@0 | 16 (use '[coderloop [utils :only [md5]]]) |
rlm@0 | 17 (import 'java.sql.Date) |
rlm@0 | 18 |
rlm@0 | 19 |
rlm@0 | 20 |
rlm@0 | 21 (def *port* 3306) |
rlm@0 | 22 |
rlm@0 | 23 (def *host* "localhost") |
rlm@0 | 24 |
rlm@0 | 25 (def *db-host* "localhost") |
rlm@0 | 26 |
rlm@0 | 27 (def *db-name* "omics") |
rlm@0 | 28 |
rlm@0 | 29 (def *db* {:classname "com.mysql.jdbc.Driver" |
rlm@0 | 30 :subprotocol "mysql" |
rlm@0 | 31 :subname (str "//" *db-host* ":" *port* "/" *db-name*) |
rlm@0 | 32 :user "root" |
rlm@0 | 33 :password "sql1005025"}) |