Using the already pruned list makes more sense here.
This commit is contained in:
parent
e4e4151587
commit
4827f0b047
|
@ -38,7 +38,7 @@
|
||||||
[exclude (reduce (fn [memo opt] (+ memo (if (> (len opt) 4) (get opt 4) []))) marked [])]
|
[exclude (reduce (fn [memo opt] (+ memo (if (> (len opt) 4) (get opt 4) []))) marked [])]
|
||||||
[excluded (filter (fn [key] (in key exclude)) keys)]
|
[excluded (filter (fn [key] (in key exclude)) keys)]
|
||||||
[cleaned (reduce (fn [memo key]
|
[cleaned (reduce (fn [memo key]
|
||||||
(if (not (in key exclude)) (assoc memo key (get config key))) memo) keys {})]]
|
(if (not (in key excluded)) (assoc memo key (get config key))) memo) keys {})]]
|
||||||
(, cleaned excluded)))
|
(, cleaned excluded)))
|
||||||
|
|
||||||
(defclass hyopt []
|
(defclass hyopt []
|
||||||
|
|
Loading…
Reference in New Issue