File tree Expand file tree Collapse file tree 1 file changed +6
-2
lines changed Expand file tree Collapse file tree 1 file changed +6
-2
lines changed Original file line number Diff line number Diff line change 18241824(defn check-rename-macros-inferring-missing
18251825 [{:keys [name renames] :as ast} env]
18261826 (let [missing-renames (when (and *analyze-deps* (seq renames))
1827- (missing-renames (:renames ast) env))
1827+ (missing-renames renames env))
1828+ maybe-macros (apply dissoc renames (keys missing-renames))
18281829 missing-rename-macros (inferred-rename-macros missing-renames env)
18291830 remove-missing-renames #(apply dissoc % (keys missing-renames))
18301831 ast' (-> ast
1831- (update-in [:rename-macros ] merge missing-rename-macros)
1832+ (update-in [:rename-macros ]
1833+ #(-> %
1834+ (merge missing-rename-macros)
1835+ (merge (inferred-rename-macros maybe-macros env))))
18321836 (update-in [:renames ] remove-missing-renames))]
18331837 (swap! env/*compiler*
18341838 #(-> %
You can’t perform that action at this time.
0 commit comments