Permalink
Browse files

Mire: moved some functions to util.clj

  • Loading branch information...
1 parent eda1eda commit e22f9a415ea2ad562ee89b5f9cc05867c52c42ff Andreas Pauley committed Dec 23, 2009
Showing with 6 additions and 5 deletions.
  1. +1 −5 PeepCode/Clojure/mire/src/mire.clj
  2. +5 −0 PeepCode/Clojure/mire/src/mire/util.clj
@@ -1,15 +1,11 @@
(add-classpath (str "file://" (.getParent (java.io.File. *file*)) "/"))
(ns mire
- (:use [mire commands rooms])
+ (:use [mire commands rooms util])
(:use [clojure.contrib server-socket duck-streams]))
(def port 3333)
-(defn- print-flush [text]
- (print text)
- (flush))
-
(defn- print-prompt []
(println)
(print-flush "> "))
@@ -0,0 +1,5 @@
+(ns mire.util)
+
+(defn print-flush [text]
+ (print text)
+ (flush))

0 comments on commit e22f9a4

Please sign in to comment.