diff options
| author | Tyler Wardhaugh <tyler.wardhaugh@entercom.com> | 2020-09-05 22:50:40 -0700 |
|---|---|---|
| committer | Tyler Wardhaugh <tyler.wardhaugh@entercom.com> | 2020-09-05 23:00:25 -0700 |
| commit | 1e02eff032f31ec7198c2447b4f19a6507496ca7 (patch) | |
| tree | 538b534c9d365b6efd1fd0cd93d8cb695bbe9cae | |
| parent | a9da878f06258fecae46dcbcea8394a3bcb20b82 (diff) | |
| download | perlweeklychallenge-club-1e02eff032f31ec7198c2447b4f19a6507496ca7.tar.gz perlweeklychallenge-club-1e02eff032f31ec7198c2447b4f19a6507496ca7.tar.bz2 perlweeklychallenge-club-1e02eff032f31ec7198c2447b4f19a6507496ca7.zip | |
Task #2: fix command-line argument handling
| -rw-r--r-- | challenge-076/tyler-wardhaugh/clojure/src/tw/weekly/ch_2.clj | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/challenge-076/tyler-wardhaugh/clojure/src/tw/weekly/ch_2.clj b/challenge-076/tyler-wardhaugh/clojure/src/tw/weekly/ch_2.clj index cd5109aab1..4b4e2e7279 100644 --- a/challenge-076/tyler-wardhaugh/clojure/src/tw/weekly/ch_2.clj +++ b/challenge-076/tyler-wardhaugh/clojure/src/tw/weekly/ch_2.clj @@ -1,5 +1,4 @@ (ns tw.weekly.ch-2 - (:require [clojure.edn :as edn]) (:require [clojure.java.io :as io]) (:require [clojure.string :as str]) (:require [clojure.core.matrix :as mat])) @@ -50,8 +49,8 @@ (defn -main "Run Task 2 with a grid file and a dictionary file, defaulting to the ones in the resources directory." [& args] - (let [grid-file (or (some-> args first edn/read-string) (io/resource "grid.txt")) - dict-file (or (some-> args second edn/read-string) (io/resource "dict.txt")) + (let [grid-file (or (some-> args first io/file) (io/resource "grid.txt")) + dict-file (or (some-> args second io/file) (io/resource "dict.txt")) grid (parse-grid-file grid-file) dict (parse-dict-file dict-file) words (word-search grid dict)] |