fix so direct-nav metadata on vars gets translated appropriately when that var is called as a function

This commit is contained in:
Nathan Marz 2016-09-03 22:07:45 -04:00
parent 18791c6b82
commit c44a380092

View file

@ -618,8 +618,11 @@
(:sym o)
(or (-> o :var direct-nav?)
(-> o :sym direct-nav?))))
(:val o))
(maybe-direct-nav
(:val o)
(or (-> o :var direct-nav?)
(-> o :sym direct-nav?)
(-> o :val direct-nav?))))
(instance? LocalSym o)
(->DynamicVal (:sym o))