Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP

Comparing changes

Choose two branches to see what’s changed or to start a new pull request. If you need to, you can also compare across forks.

Open a pull request

Create a new pull request by comparing changes across two branches. If you need to, you can also compare across forks.
base: 83f5914407
...
compare: 32e77f985c
  • 5 commits
  • 2 files changed
  • 0 commit comments
  • 1 contributor
View
1  clojure/resources/public/css/openshift.css
@@ -16,7 +16,6 @@ a {
}
h1 {
- text-transform: uppercase;
-moz-text-shadow: 2px 2px 2px black;
-webkit-text-shadow: 2px 2px 2px black;
text-shadow: 2px 2px 2px black;
View
18 clojure/src/pingpong/core.clj
@@ -8,11 +8,19 @@
(defn layout [& msgs]
(html5
- [:head
- [:title "Ping Pong"]
- (include-css "css/openshift.css")]
- [:body
- [:h1 (apply str (interpose " " msgs))]]))
+ [:head
+ [:title "Ping Pong"]
+ (include-css "css/openshift.css")]
+ [:body
+ [:h1 (apply str (interpose " " msgs))]
+ [:p
+ (link-to "/clojure" "clojure") ": "
+ (link-to "/clojure/ping" "ping") " "
+ (link-to "/clojure/pong" "pong")]
+ [:p
+ (link-to "/ruby" "ruby") ": "
+ (link-to "/ruby/ping" "ping") " "
+ (link-to "/ruby/pong" "pong")]]))
(defn ping []
(let [msg (str "hello from clojure at " (System/currentTimeMillis))]

No commit comments for this range

Something went wrong with that request. Please try again.