diff options
Diffstat (limited to 'test/clojure/test_clojure/java/shell.clj')
| -rw-r--r-- | test/clojure/test_clojure/java/shell.clj | 16 |
1 files changed, 12 insertions, 4 deletions
diff --git a/test/clojure/test_clojure/java/shell.clj b/test/clojure/test_clojure/java/shell.clj index a8c6f0a0..777698e2 100644 --- a/test/clojure/test_clojure/java/shell.clj +++ b/test/clojure/test_clojure/java/shell.clj @@ -1,3 +1,11 @@ +; Copyright (c) Rich Hickey. All rights reserved. +; The use and distribution terms for this software are covered by the +; Eclipse Public License 1.0 (http://opensource.org/licenses/eclipse-1.0.php) +; which can be found in the file epl-v10.html at the root of this distribution. +; By using this software in any fashion, you are agreeing to be bound by +; the terms of this license. +; You must not remove this notice, or any other, from this software. + (ns clojure.test-clojure.java.shell (:use clojure.test [clojure.java.shell :as sh]) @@ -5,10 +13,10 @@ (deftest test-parse-args (are [x y] (= x y) - {:cmd [nil] :out "UTF-8" :dir nil :env nil} (#'sh/parse-args []) - {:cmd ["ls"] :out "UTF-8" :dir nil :env nil} (#'sh/parse-args ["ls"]) - {:cmd ["ls" "-l"] :out "UTF-8" :dir nil :env nil} (#'sh/parse-args ["ls" "-l"]) - {:cmd ["ls"] :out "ISO-8859-1" :dir nil :env nil} (#'sh/parse-args ["ls" :out "ISO-8859-1"]))) + [[] {:out "UTF-8" :dir nil :env nil}] (#'sh/parse-args []) + [["ls"] {:out "UTF-8" :dir nil :env nil}] (#'sh/parse-args ["ls"]) + [["ls" "-l"] {:out "UTF-8" :dir nil :env nil}] (#'sh/parse-args ["ls" "-l"]) + [["ls"] {:out "ISO-8859-1" :dir nil :env nil}] (#'sh/parse-args ["ls" :out "ISO-8859-1"]))) (deftest test-with-sh-dir (are [x y] (= x y) |