Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

log sections

  • Loading branch information...
commit 2da6f07548a42238f1c50c1f4416d5beb157e103 1 parent d30f33b
@duck1123 authored
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/ciste/sections.clj
View
4 src/ciste/sections.clj
@@ -103,7 +103,7 @@ Example:
(defn log-section
[sym dispatch-val]
- (log/debugf "%s %s" sym dispatch-val))
+ (log/debugf "%s - %s" dispatch-val sym))
(defmacro defsection
[name dispatch-val binding-form & body]
@@ -122,7 +122,7 @@ Example:
full-symbol# (symbol (str declared-ns# "/" method-name#))]
`(defmethod ~full-symbol# ~dispatch-val#
~binding-form
- (log-section '~full-symbol# '~dispatch-val#)
+ (log-section '~name# '~dispatch-val#)
~@body))
(throw (IllegalArgumentException. (str "Can not resolve section: " name))))))
Please sign in to comment.
Something went wrong with that request. Please try again.