From 701fc1a21d75ac87c3c195a757dd74e82c74f45f Mon Sep 17 00:00:00 2001 From: Simon Brooke Date: Fri, 29 Jun 2018 23:36:36 +0100 Subject: [PATCH] Detail changes --- src/adl_support/tags.clj | 12 +++++------- 1 file changed, 5 insertions(+), 7 deletions(-) diff --git a/src/adl_support/tags.clj b/src/adl_support/tags.clj index b1c76a3..ccf9908 100644 --- a/src/adl_support/tags.clj +++ b/src/adl_support/tags.clj @@ -33,15 +33,13 @@ "Add custom tags required by ADL-generated code to the parser's tags." (p/add-tag! :ifmemberof (fn [args context content] - (if-member-of-permitted args context - (get-in content [:ifmemberof :content]) (get-in content [:else :content]))) + (if-member-of-permitted + args context + (get-in content [:ifmemberof :content]) + (get-in content [:else :content]))) :else (fn [args context content] "") - :endifmemberof)) + :endifmemberof)) (add-tags) - -(if-member-of-permitted '("public" "canvassers") {:user-roles #{"canvassers"}} "caramba" false) - -