-
Notifications
You must be signed in to change notification settings - Fork 2
Commit
- Loading branch information
There are no files selected for viewing
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,21 +1,10 @@ | ||
(defproject speclj_www "0.0.1" | ||
:description "A website deployable to AppEngine" | ||
(defproject speclj_www "1.0.0" | ||
:description "Speclj's Documentation Website" | ||
:dependencies [[org.clojure/clojure "1.5.1"] | ||
[joodo "1.1.2"] | ||
[speclj "2.5.0"] | ||
] | ||
[speclj "2.5.0"]] | ||
:min-lein-version "2.0.0" | ||
|
||
; lein 1.x | ||
:dev-dependencies [[speclj "2.5.0"]] | ||
:test-path "spec/" | ||
|
||
;lein 2.x | ||
:profiles {:dev {:dependencies [[speclj "2.5.0"]]}} | ||
:plugins [[speclj "2.5.0"] | ||
[joodo/lein-joodo "1.1.2"]] | ||
:test-paths ["spec"] | ||
|
||
;:java-source-path "src/" | ||
:repl-init-script "config/development/repl_init.clj" | ||
:joodo-core-namespace speclj_www.core) |
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,22 @@ | ||
(ns speclj_www.controller.docs-controller-spec | ||
(:require [joodo.spec-helpers.controller :refer :all ] | ||
[speclj.core :refer :all ] | ||
[speclj_www.controller.docs-controller :refer :all ])) | ||
|
||
(describe "docs_controller_spec.clj" | ||
|
||
(with-routes docs-controller) | ||
(with-mock-rendering :strict true :template-root "speclj_www/view") | ||
|
||
(it "renders a components documentation" | ||
(let [response (do-get "/docs/describe")] | ||
(should= 200 (:status response)) | ||
(should= "describe" (:component-name @rendered-context)) | ||
(should-not= nil (:doc @rendered-context)))) | ||
|
||
(it "404s on a missing component" | ||
(let [response (do-get "/docs/foo")] | ||
(should= 404 (:status response)) | ||
(should= "not_found" @rendered-template))) | ||
|
||
) |
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,15 @@ | ||
(ns speclj_www.view.view-helpers-spec | ||
(:require [speclj.core :refer :all] | ||
[speclj_www.view.view-helpers :refer :all])) | ||
|
||
(describe "view_helpers_spec.clj" | ||
|
||
(it "spec components" | ||
(should= true (> (count speclj-components) 15)) | ||
(doseq [name speclj-components] | ||
(should-not= true (.startsWith name "-")) | ||
(should-not= true (.startsWith name "*"))) | ||
) | ||
|
||
|
||
) |
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,42 +1,14 @@ | ||
(ns speclj_www.controller.docs-controller | ||
(:use | ||
[compojure.core :only (routes GET)] | ||
[joodo.views :only (render-template render-html)] | ||
)) | ||
(:use [compojure.core :only (routes GET context)] | ||
[joodo.views :only (render-template render-html)])) | ||
|
||
(def speclj-ns (the-ns 'speclj.core)) | ||
|
||
(defn render-docs-for [component-name] | ||
(if-let [component (ns-resolve speclj-ns (symbol component-name))] | ||
(render-template "docs/doc" :component-name component-name :doc (:doc (meta component))) | ||
{:status 404 :body (render-template "not_found")})) | ||
|
||
(def docs-controller | ||
(-> | ||
(routes | ||
(GET "/docs" [] (render-template "docs/index")) | ||
(GET "/docs/" [] (render-template "docs/index")) | ||
(GET "/docs/describe" [] (render-template "docs/describe")) | ||
(GET "/docs/it" [] (render-template "docs/it")) | ||
(GET "/docs/context" [] (render-template "docs/context")) | ||
(GET "/docs/should" [] (render-template "docs/should")) | ||
(GET "/docs/should-not" [] (render-template "docs/should_not")) | ||
(GET "/docs/should-e" [] (render-template "docs/should_e")) | ||
(GET "/docs/should-not-e" [] (render-template "docs/should_not_e")) | ||
(GET "/docs/should-fail" [] (render-template "docs/should_fail")) | ||
(GET "/docs/should-throw" [] (render-template "docs/should_throw")) | ||
(GET "/docs/should-not-throw" [] (render-template "docs/should_not_throw")) | ||
(GET "/docs/before" [] (render-template "docs/before")) | ||
(GET "/docs/before-all" [] (render-template "docs/before_all")) | ||
(GET "/docs/after" [] (render-template "docs/after")) | ||
(GET "/docs/after-all" [] (render-template "docs/after_all")) | ||
(GET "/docs/with" [] (render-template "docs/with")) | ||
(GET "/docs/with-all" [] (render-template "docs/with-all")) | ||
(GET "/docs/around" [] (render-template "docs/around")) | ||
(GET "/docs/tags" [] (render-template "docs/tags")) | ||
(GET "/docs/run-specs" [] (render-template "docs/run-specs")) | ||
(GET "/docs/should-be-nil" [] (render-template "docs/should-be-nil")) | ||
(GET "/docs/should-be-same" [] (render-template "docs/should-be-same")) | ||
(GET "/docs/should-contain" [] (render-template "docs/should-contain")) | ||
(GET "/docs/should-not-be-nil" [] (render-template "docs/should-not-be-nil")) | ||
(GET "/docs/should-not-be-same" [] (render-template "docs/should-not-be-same")) | ||
(GET "/docs/should-not-contain" [] (render-template "docs/should-not-contain")) | ||
(GET "/docs/should-not-e-e" [] (render-template "docs/should-not-e-e")) | ||
(GET "/docs/should-e-e" [] (render-template "docs/should-e-e")) | ||
(GET "/docs/with-bang" [] (render-template "docs/with-bang")) | ||
(GET "/docs/with-all-bang" [] (render-template "docs/with-all-bang")) | ||
(GET "/docs/xit" [] (render-template "docs/xit")) | ||
))) | ||
(context "/docs" [] | ||
(GET "/:component-name" [component-name] (render-docs-for component-name)))) |
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,4 @@ | ||
[:h3 (:component-name *view-context*)] | ||
|
||
[:div {:id "comp_box"} | ||
[:pre (:doc *view-context*)]] |
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.
This file was deleted.