fmw

(def h (atom nil))

(defn routes [uri-path]
  (compare-and-set! h nil (new goog.history.Html5History))
  (cond
   (re-matches #"^/admin/[^/]+/new$" uri-path) (editor/start :new uri-path)
   (re-matches #"^/admin/[^/]+/edit.+" uri-path) (editor/start :edit uri-path)
   (re-matches #"^/admin/[^/]+/overview$" uri-path) (feed/list-documents uri-path)))

fmw

(ns vix.views.feed
  (:require [vix.core :as core]
            [vix.document :as document]
            [vix.util :as util]
            [soy :as soy]
            [vix.templates.feed :as tpl]
            [goog.events :as events]
            [goog.dom :as dom]))

(defn display-document-list [main-el xhr e]

fmw

cljs.core._seq = (function _seq(o){
if(cljs.core.truth_((function (){var and__3574__auto____2050 = o;
if(cljs.core.truth_(and__3574__auto____2050))
{return o.cljs$core$ISeqable$_seq;
} else
{return and__3574__auto____2050;
}
})()))
{return o.cljs$core$ISeqable$_seq(o);
} else

fmw

goog.provide('cljs.core');
goog.require('goog.string');
goog.require('goog.string.StringBuffer');
goog.require('goog.object');
goog.require('goog.array');
/**
* Internal - do not use!
*/
cljs.core.truth_ = (function truth_(x){
return (x != null && x !== false);

fmw

fmw@icarus:~/clj/vix$ lein cljsbuild once
Compiling ClojureScript.
Exception in thread "main" java.lang.IllegalArgumentException: No implementation of method: :as-file of protocol: #'clojure.java.io/Coercions found for class: clojure.lang.PersistentList
	at clojure.core$_cache_protocol_fn.invoke(core_deftype.clj:527)
	at clojure.java.io$fn__8184$G__8179__8189.invoke(io.clj:35)
	at clojure.java.io$file.invoke(io.clj:413)
	at clojure.lang.AFn.applyToHelper(AFn.java:161)
	at clojure.lang.RestFn.applyTo(RestFn.java:132)
	at clojure.core$apply.invoke(core.clj:603)
	at fs.core$file.doInvoke(core.clj:55)

fmw

drwxrwxr-x 2 fmw fmw     4096 May  7 16:39 classes
-rw-rw-r-- 1 fmw fmw  5045308 Sep 21  2011 closure-templates-for-javascript-latest.zip
-rw-r--r-- 1 fmw fmw    11358 Sep 19  2011 COPYING
drwxrwxr-x 3 fmw fmw     4096 May  7 16:39 lib
-rw-rw-r-- 1 fmw fmw    11358 Sep 22  2011 LICENSE
drwxrwxr-x 2 fmw fmw     4096 Aug  3 10:44 phantom
-rw-rw-r-- 1 fmw fmw     5221 Aug  4 17:55 project.clj
-rw-r--r-- 1 fmw fmw     1491 Sep 19  2011 README
-rw-rw-r-- 1 fmw fmw     7961 Jul 20 05:19 README.rst
drwxrwxr-x 5 fmw fmw     4096 Aug  3 10:42 resources

fmw

(defproject vix "1.0.0-SNAPSHOT"
  :description "Vix is a document repository and management system."
  :dependencies [[org.clojure/clojure "1.4.0"]
                 [org.clojure/data.codec "0.1.0"]
                 [org.clojure/data.json "0.1.2"]
                 [org.clojure/algo.generic "0.1.0"]
                 [slingshot "0.10.3"]
                 [org.mindrot/jbcrypt "0.3m"]
                 [compojure "1.1.0"]
                 [ring/ring-core "1.1.1"]

fmw

(ns riaktest.core
  (:require [clojure.string :as string]
            [clj-time.core :as time-core]
            [clj-time.format :as time-format]
            [clojurewerkz.welle.core :as wc]
            [clojurewerkz.welle.mr :as mr]
            [clojurewerkz.welle.kv :as wkv]
            [clojurewerkz.welle.buckets :as wbuckets]))

(wc/connect!)

fmw

(ns xmltest.core
  (:require [clojure.data.xml :as xml])
  (:import [java.io FileInputStream]
           [java.util.zip GZIPInputStream]))

(defn parse [filename]
  (xml/parse (FileInputStream. filename)))

(defn parse-gzipped [filename]
  (xml/parse (GZIPInputStream. (FileInputStream. filename))))

fmw

(ns xmltest.core
  (:require [clojure.data.xml :as xml])
  (:import [java.io FileInputStream]
           [java.util.zip GZIPInputStream]))

(defn parse [filename]
  (xml/parse (FileInputStream. filename)))

(defn parse-gzipped [filename]
  (xml/parse (GZIPInputStream. (FileInputStream. filename))))