Added covers for installation episodes

stonegao · Feb 5, 2010 · 7731c86 · 7731c86
1 parent 301010b
commit 7731c86
Show file tree

Hide file tree

Showing 4 changed files with 50 additions and 1 deletion.
diff --git a/src/install_001/cover.html b/src/install_001/cover.html
@@ -0,0 +1,15 @@
+<html>
+<head>
+	<link rel="stylesheet" type="text/css" media="all" href="../cover.css" />
+</head>
+<body id="cover">
+	<div id="title-div">
+		<p id="title">Full Disclojure</p>
+		<p id="episode-name">
+			<span class="clojure-dark-green">Installation</span> :
+			<span class="clojure-dark-blue">Command Line</span>
+		</p>
+		<p id="cc-license"><br><img src="../cc-by-nc-sa.png"></p>
+	</div>
+</body>
+</html>
diff --git a/src/install_002/cover.html b/src/install_002/cover.html
@@ -0,0 +1,15 @@
+<html>
+<head>
+	<link rel="stylesheet" type="text/css" media="all" href="../cover.css" />
+</head>
+<body id="cover">
+	<div id="title-div">
+		<p id="title">Full Disclojure</p>
+		<p id="episode-name">
+			<span class="clojure-dark-green">Installation</span> :
+			<span class="clojure-dark-blue">Clojure Box</span>
+		</p>
+		<p id="cc-license"><br><img src="../cc-by-nc-sa.png"></p>
+	</div>
+</body>
+</html>
diff --git a/src/install_003/cover.html b/src/install_003/cover.html
@@ -0,0 +1,15 @@
+<html>
+<head>
+	<link rel="stylesheet" type="text/css" media="all" href="../cover.css" />
+</head>
+<body id="cover">
+	<div id="title-div">
+		<p id="title">Full Disclojure</p>
+		<p id="episode-name">
+			<span class="clojure-dark-green">Installation</span> :
+			<span class="clojure-dark-blue">NetBeans</span>
+		</p>
+		<p id="cc-license"><br><img src="../cc-by-nc-sa.png"></p>
+	</div>
+</body>
+</html>
diff --git a/src/kata_001/kata_001.clj b/src/kata_001/kata_001.clj
@@ -14,7 +14,11 @@
        (multi-same split delimiters s)))
 
 (defn adder [s]
-  (reduce + (custom-parse s)))
+  (let [coll (custom-parse s)
+	neg-coll (filter neg? coll)]
+    (if (empty? neg-coll)
+      (reduce + coll)
+      (Exception. (apply str neg-coll)))))
 
 (defn adder2 [s]
   (if (#{"//"} (same take 2 s))