X-Git-Url: https://git.saurik.com/redis.git/blobdiff_plain/5762b7f0f8d33eda021da908b6ddced684a2ba05..1259672feb4fcad189d413a341745990a844feda:/client-libraries/clojure/examples/demo.clj diff --git a/client-libraries/clojure/examples/demo.clj b/client-libraries/clojure/examples/demo.clj deleted file mode 100644 index d441e975..00000000 --- a/client-libraries/clojure/examples/demo.clj +++ /dev/null @@ -1,33 +0,0 @@ -;; -;; Simple demo of redis-clojure functionality -;; -;; Make sure redis-clojure.jar or the contents of the src/ directory -;; is on the classpath. -;; -;; Either: -;; (add-classpath "file:///path/to/redis-clojure.jar" -;; or: -;; (add-classpath "file:///path/to/redis/src-dir/") -;; - -(add-classpath "file:///Users/ragge/Projects/clojure/redis-clojure/redis-clojure.jar") - -(ns demo - (:require redis)) - - -(redis/with-server - {:host "127.0.0.1" :port 6379 :db 0} - (do - (println "Sending ping") - (println "Reply:" (redis/ping)) - (println "Server info:") - (let [info (redis/info)] - (dorun - (map (fn [entry] - (println (str "- "(first entry) ": " (last entry)))) info))) - (println "Setting key 'foo' to 'bar'") - (println "Reply:" (redis/set "foo" "bar")) - (println "Getting value of key 'foo'") - (println "Reply:" (redis/get "foo")))) -