Skip to content


Subversion checkout URL

You can clone with
Download ZIP
tree: e1f13feec4
Fetching contributors…

Cannot retrieve contributors at this time

93 lines (83 sloc) 3.526 kB
(ns tryclojure.views.home
(:require [noir.core :refer [defpartial defpage]]
[hiccup.element :refer [javascript-tag link-to unordered-list]]
[ :refer [include-css include-js html5]]))
(defpartial links-html []
[(link-to "" "The official Clojure website")
(link-to "" "Getting started with Clojure")
(link-to "" "Clojure mailing list")
(link-to "" "A comprehensive Clojure tutorial")
(link-to "" "The Joy of Clojure: a book by Michael Fogus and Chris Houser")
(link-to "" "Disclojure")
(link-to "" "Planet Clojure")]))
(defpartial about-html []
"Welcome to Try Clojure - a quick tour of Clojure for absolute beginners."
"Here is our only disclaimer: this site is an introduction to Clojure, not a generic Clojure REPL. "
"You won't be able to do everything in it that you could do in your local interpreter. "
"Also, the interpreter deletes the data that you enter if you define too many things, or after 15 minutes."]
"TryClojure is written in Clojure and JavaScript with "
(link-to "" "Noir") ", "
(link-to "" "clojail") ", and Chris Done's "
(link-to "" "jquery-console") ". "
" The design is by " (link-to "" "Andrew Gwozdziewycz") "."
(defpartial home-html []
"Welcome to Clojure! "
"You can see a Clojure interpreter above - we call it a <em>REPL</em>."
"Type <code>next</code> in the REPL to begin."
(defn root-html []
(include-css "/resources/public/css/tryclojure.css"
(include-js ""
[:title "Try Clojure"]]
(link-to "" "Fork me on GitHub")
[:span.logo-try "Try"] " "
[:span.logo-clojure "Clo" [:em "j"] "ure"]]]
[:a#home.buttons "home"]
[:a#links.buttons "links"]
[:a#about.buttons.last "about"]]
[:div#changer (home-html)]]
[:p.bottom "©2011-2012 Anthony Grimes and numerous contributors."]]
"var _gaq = _gaq || [];
_gaq.push(['_setAccount', 'UA-27340918-1']);
(function() {
var ga = document.createElement('script'); ga.type = 'text/javascript'; ga.async = true;
ga.src = ('https:' == document.location.protocol ? 'https://ssl' : 'http://www') + '';
var s = document.getElementsByTagName('script')[0]; s.parentNode.insertBefore(ga, s);
(defpage "/" []
(defpage "/home" []
(defpage "/about" []
(defpage "/links" []
Jump to Line
Something went wrong with that request. Please try again.