       :action/r (:unit/r unit)}]
     []))
 
+(defn repair-other-actions [db game unit]
+  (if (can-repair-other? db game unit)
+    (map (fn [wounded]
+           {:action/type :action.type/repair-other-unit
+            :action/repairer-q (:unit/q unit)
+            :action/repairer-r (:unit/r unit)
+            :action/wounded-q (:unit/q wounded)
+            :action/wounded-r (:unit/r wounded)})
+         (friends-in-range db game unit))
+    []))
+
 (defn capture-actions [db game unit]
   (let [{:keys [unit/q unit/r unit/terrain]} unit]
     (if (can-capture? db game unit terrain)

      false)))

(defn can-repair-other? [db game unit]
  (get-in unit [:unit/type :unit-type/can-repair]))

(defn can-be-repaired? [db game unit]
  (< (:unit/count unit) (:game/max-count-per-unit game)))

  (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]
