   [{:keys [tag args body]}]
   (fn [context-map]
     (if args
-      (apply (get-tag tag) args body)
-      (apply (get-tag) body))))
+      (apply (get-tag tag) context-map args body)
+      (apply (get-tag) context-map body))))
 
 ;;; End of tag compiling
 

        (case next-step
          ;; Found end of string
          ;; TODO - error if there's still a closing tag to find
          :end ast
          :read-filter (recur :read-filter
                              (conj ast buffered-str)
                              to-find)

(ns selmer.parser
  (:require [clojure.string :as s]
            [selmer.filters :refer [get-filter]]
            [selmer.tags :refer [tags]])
  (:import [java.io PushbackReader CharArrayReader]))

;;; TODO - implement filter/tag parsers
