Skip to content

Instantly share code, notes, and snippets.

@cap10morgan
cap10morgan / gist:6284911
Created August 20, 2013 17:59
Datomic entity creation, querying, and retraction
elections-api.peer=> (init-db)
#<promise$settable_future$reify__5429@127cc7ca: {:db-before datomic.db.Db@1ea21c76, :db-after datomic.db.Db@61f108a4, :tx-data [#Datum{:e 13194139534313 :a 50 :v #inst "2013-08-20T17:13:49.111-00:00" :tx 13194139534313 :added true} #Datum{:e 17592186045418 :a 10 :v :election-constructor :tx 13194139534313 :added true} #Datum{:e 17592186045418 :a 52 :v #db/fn{:code "(if (not (nil? district)) (let [txn [(merge district [:db/id #db/id[:db.part/user -2]]) (merge election {:db/id #db/id[:db.part/user -1], :turbovote.election/district #db/id[:db.part/user -2]})]] txn) (let [txn [(merge election {:db/id #db/id[:db.part/user -1]})]] txn))", :params [db election district], :requires [], :imports [], :lang :clojure} :tx 13194139534313 :added true}], :tempids {-9223350046623220306 17592186045418}}>
elections-api.peer=> (def conn (d/connect "datomic:mem://elections-api"))
#'elections-api.peer/conn
elections-api.peer=> (d/transact conn [[:election-constructor {:turbovote.election/name "Foo
@cap10morgan
cap10morgan / gist:6224916
Created August 13, 2013 19:43
Output of `lein with-profile production uberjar` under 2.3.1; this produces a non-working jar file
ᐅ lein with-profile production uberjar
Performing task 'uberjar' with profile(s): 'production'
Retrieving lein-midje/lein-midje/3.0.1/lein-midje-3.0.1.pom from clojars
Retrieving lein-midje/lein-midje/3.0.1/lein-midje-3.0.1.jar from clojars
Created /Users/wmorgan/dev/mail-batcher/target/production+uberjar/mail-batcher-0.0.1-SNAPSHOT.jar
Created /Users/wmorgan/dev/mail-batcher/target/production/mail-batcher-0.0.1-SNAPSHOT-standalone.jar
ᐅ java -jar target/production/mail-batcher-0.0.1-SNAPSHOT-standalone.jar
Error: Could not find or load main class mail_batcher.core
@cap10morgan
cap10morgan / gist:6224894
Created August 13, 2013 19:41
output of `lein with-profile production uberjar` under 2.2.0; this produces a working jar file
ᐅ lein with-profile production uberjar
Performing task 'uberjar' with profile(s): 'production'
Compiling mail-batcher.core
Aug 13, 2013 1:36:48 PM com.mchange.v2.log.MLog <clinit>
INFO: MLog clients using java 1.4+ standard logging.
Created /Users/wmorgan/dev/mail-batcher/target/production+uberjar+provided/mail-batcher-0.0.1-SNAPSHOT.jar
Including mail-batcher-0.0.1-SNAPSHOT.jar
Including jedis-1.5.2.jar
Including data.json-0.1.2.jar
Including jackson-dataformat-smile-2.1.4.jar
(defproject mail-batcher "0.0.1-SNAPSHOT"
:description "Find and generate forms for registrations and elections in date range"
:dependencies [[org.clojure/clojure "1.5.1"]
[turbovote/clj-time "0.5.1-SNAPSHOT"]
[korma "0.3.1-SNAPSHOT"]
[mysql/mysql-connector-java "5.1.24"]
[sonian/carica "1.0.2"]
[cheshire "5.1.1"]
[resque-clojure "0.2.2"]
[org.clojure/tools.cli "0.2.2"]
$ lein test pallet.actions.direct.remote-file-test
lein test pallet.actions.direct.remote-file-test
17:19:04.749 [operate-8] ERROR pallet.execute - localhost #> remote-file /tmp/pallet_4033649009093972374tmp : FAIL
lein test :only pallet.actions.direct.remote-file-test/remote-file-test
FAIL in (remote-file-test) (remote_file_test.clj:454)
local-file url
expected: (nil? (phase-errors op))
school: &school
blah: true
thingy: whatever
sites:
iop:
<<: *school
harvard: awesome
cost:
- arm
school: &school
blah: true
thingy: whatever
iop:
<<: *school
harvard: awesome
cost:
- arm
- leg
(defproject elections-api "0.0.1-SNAPSHOT"
:description "TurboVote elections API"
:dependencies [[org.clojure/clojure "1.5.1"]
[compojure "1.0.2"]
[ring/ring-jetty-adapter "1.1.0"]
[liberator "0.9.0-SNAPSHOT"]
[com.datomic/datomic-free "0.8.4020.26"
:exclusions [org.slf4j/slf4j-nop]]
[bouncer "0.2.3-beta1"]
[turbovote/clj-time "0.5.1-SNAPSHOT"]
12:46:38,806 ERROR [stderr] (http-/127.0.0.1:8080-1) Exception: java.io.FileNotFoundException: Could not locate ring/mock/request__init.class or ring/mock/request.clj on classpath:
12:46:38,807 ERROR [stderr] (http-/127.0.0.1:8080-1) RT.java:443 clojure.lang.RT.load
12:46:38,807 ERROR [stderr] (http-/127.0.0.1:8080-1) RT.java:411 clojure.lang.RT.load
12:46:38,807 ERROR [stderr] (http-/127.0.0.1:8080-1) core.clj:5530 clojure.core/load[fn]
12:46:38,807 ERROR [stderr] (http-/127.0.0.1:8080-1) core.clj:5529 clojure.core/load
12:46:38,807 ERROR [stderr] (http-/127.0.0.1:8080-1) RestFn.java:408 clojure.lang.RestFn.invoke
12:46:38,807 ERROR [stderr] (http-/127.0.0.1:8080-1) core.clj:5336 clojure.core/load-one
12:46:38,807 ERROR [stderr] (http-/127.0.0.1:8080-1) core.clj:5375 clojure.core/load-lib[fn]
12:46:38,807 ERROR [stderr] (http-/127.0.0.1:8080-1) core.clj:5374 clojur
@cap10morgan
cap10morgan / project.clj
Created July 23, 2013 16:50
lein new pallet [project-name] with-pallet '0.8.0-RC.1' with-pallet-jclouds '1.5.3' with-pallet-vmfest '0.3.0-alpha.5'
(defproject pallet-new "0.1.0-SNAPSHOT"
:description "FIXME Pallet project for pallet-new"
:dependencies [[org.clojure/clojure "1.4.0"]
[com.palletops/pallet "0.8.0-RC.1"]
[com.palletops/pallet-jclouds "1.5.3"]
;; To get started we include all jclouds compute providers.
;; You may wish to replace this with the specific jclouds
;; providers you use, to reduce dependency sizes.
[org.jclouds/jclouds-allblobstore "1.5.5"]
[org.jclouds/jclouds-allcompute "1.5.5"]