In the following example clj-kondo reports unued `orient` binding ``` (defn apply-body [canv orient f] (c2d/with-oriented-canvas orient [c (:canvas canv)] (c2d/translate c (:shift canv)) (f c))) ```