Skip to content

Commit

Permalink
change order of option in cap.
Browse files Browse the repository at this point in the history
  • Loading branch information
hozumi committed May 22, 2010
1 parent fb43e10 commit 7c2d363
Showing 1 changed file with 6 additions and 5 deletions.
11 changes: 6 additions & 5 deletions src/hozumi/eyewrap.clj
Expand Up @@ -328,10 +328,6 @@
(assoc option-map# :1line true))
ope-set# (difference (set (keys option-map#))
#{:v :all :pp :1line :nth :s history-key#})]
(doseq [id# node-ids#]
(if (<= 2 (count node-ids#))
(println (apply str (repeat 100 "="))))
(print-node @~mem id# option-map#))
(doseq [opt# ope-set#]
(condp = opt#
:i (pprint @~mem)
Expand All @@ -343,7 +339,12 @@
:number (e.g. :1, :2, :3..) - print old trace log.
:all - print all trace log.
:i - print internal data.
:c - clear cache."))))))
:c - clear cache.")))
(doseq [id# node-ids#]
(if (<= 2 (count node-ids#))
(println (apply str (repeat 100 "="))))
(print-node @~mem id# option-map#))
)))
~(let [expanded (macroexpand-all form)
fs (first expanded)
se (second expanded)
Expand Down

0 comments on commit 7c2d363

Please sign in to comment.