         computed-mem (if checkpoint-memory-overhead (add-as-decimals mem checkpoint-memory-overhead) mem)]
 
     ; metadata
-    (.setName metadata (str task-id))
+    (.setName metadata pod-name)
     (.setNamespace metadata namespace)
     (.setLabels metadata labels)
     (when pod-annotations

        "exec 2>$COOK_SANDBOX/stderr; "
        "exec /bin/sh -c \"$1\"")
   "--"])

; DeletionCandidateTaint is a soft taint that k8s uses to mark unneeded
; nodes as preferably unschedulable. This taint is added as soon as the

  "Extract the name of a pod from the pod itself"
  [^V1Pod pod]
  (-> pod .getMetadata .getName))

(defn pod-unschedulable?
  "Returns true if the given pod status has a PodScheduled
