Mercurial > rlm
comparison 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 |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:78a630e650d2 |
---|---|
1 (ns rlm.openmind | |
2 (:refer-clojure :only []) | |
3 (:require rlm.ns-rlm rlm.light-base)) | |
4 (rlm.ns-rlm/ns-clone rlm.light-base) | |
5 | |
6 | |
7 (use 'clojure.contrib.sql) | |
8 (import 'org.gjt.mm.mysql.Driver) | |
9 (use 'clojure.contrib.sql) | |
10 (undef distinct case compile drop take sort) | |
11 (use 'clojureql.core) | |
12 (import 'java.io.File) | |
13 (use '[clojure.java.io :only [copy]]) | |
14 (use '[clojure.contrib.shell-out :only [sh]]) | |
15 (use '[clojure.string :only [split]]) | |
16 (use '[coderloop [utils :only [md5]]]) | |
17 (import 'java.sql.Date) | |
18 | |
19 | |
20 | |
21 (def *port* 3306) | |
22 | |
23 (def *host* "localhost") | |
24 | |
25 (def *db-host* "localhost") | |
26 | |
27 (def *db-name* "omics") | |
28 | |
29 (def *db* {:classname "com.mysql.jdbc.Driver" | |
30 :subprotocol "mysql" | |
31 :subname (str "//" *db-host* ":" *port* "/" *db-name*) | |
32 :user "root" | |
33 :password "sql1005025"}) |