diff options
| author | Tianxiang Xiong <tianxiang.xiong@fundingcircle.com> | 2017-07-20 14:50:41 -0700 |
|---|---|---|
| committer | Bozhidar Batsov <bozhidar.batsov@gmail.com> | 2017-07-23 08:28:21 +0300 |
| commit | 9db616d9c1b06b4d55f9f264c7b14a62c63f640e (patch) | |
| tree | bf3ace989e6e53ca933da42dc55824ac094cdcf7 /cider-browse-spec.el | |
| parent | 92a1ecb851ef3014c84077f8fb4c1f17d1bc14e4 (diff) | |
Fix misplaced form in `cider-browse-spec--pprint`
Diffstat (limited to 'cider-browse-spec.el')
| -rw-r--r-- | cider-browse-spec.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/cider-browse-spec.el b/cider-browse-spec.el index 30e57b16..858fbf98 100644 --- a/cider-browse-spec.el +++ b/cider-browse-spec.el @@ -164,8 +164,8 @@ Display TITLE at the top and SPECS are indented underneath." ;; prettier fns #() ((string-equal form-tag "clojure.core/fn") (if (equal (cl-second form) '("%")) - (format "#%s" (cl-reduce #'concat (mapcar #'cider-browse-spec--pprint (cl-rest (cl-rest form)))))) - (format "(fn [%%] %s)" (cl-reduce #'concat (mapcar #'cider-browse-spec--pprint (cl-rest (cl-rest form)))))) + (format "#%s" (cl-reduce #'concat (mapcar #'cider-browse-spec--pprint (cl-rest (cl-rest form))))) + (format "(fn [%%] %s)" (cl-reduce #'concat (mapcar #'cider-browse-spec--pprint (cl-rest (cl-rest form))))))) ;; prettier (s/and ) ((cider--spec-fn-p form-tag "and") (format "(s/and\n%s)" (string-join (thread-last (cl-rest form) |