Permalink
Browse files

Added a version command.

  • Loading branch information...
1 parent dfcc8ed commit a8f4f3b3e18b984bd3a2efd16e0c21b9134872f4 @Raynes committed Jul 22, 2010
Showing with 5 additions and 0 deletions.
  1. +5 −0 src/gotmilk/core.clj
View
@@ -89,6 +89,11 @@
(str "\n" (@help-map cmd) "\n")
"\nCommands are user and repo. Do gotmilk help <command> for more.\n"))
+(defcommand "version"
+ "Check what version you're running."
+ []
+ :else [] (format-result *version*))
+
(defn take-and-format [x & [n]]
(let [n (when n (Integer/parseInt n))
x (if n (take n x) x)]

0 comments on commit a8f4f3b

Please sign in to comment.