       false)))
 
 (defn can-repair-other? [db game unit]
-  (get-in unit [:unit/type :unit-type/can-repair]))
+  (try
+    (check-can-repair-other db game unit)
+    true
+    (catch :default ex
+      false)))
 
 (defn can-be-repaired? [db game unit]
   (< (:unit/count unit) (:game/max-count-per-unit game)))

           closest)))
     (enemies db game unit))))

(defn unit-can-act? [db game unit]
  (let [terrain (:unit/terrain unit)]
    (or (can-move? db game unit)

  (concat (move-actions db game unit)
          (attack-actions db game unit)
          (repair-actions db game unit)
          (repair-other-actions db game unit)
          (capture-actions db game unit)))

(defn actionable-units [db game]
