diff --git a/backend/src/app/srepl/fixes.clj b/backend/src/app/srepl/fixes.clj
index 1125967c6d..3014232c88 100644
--- a/backend/src/app/srepl/fixes.clj
+++ b/backend/src/app/srepl/fixes.clj
@@ -364,8 +364,10 @@
                                 fix-touched-children
                                 (fn [shape]
                                   (let [matches? (fn [[child-id ref-child-id]]
-                                                   (let [child (ctn/get-shape page child-id)]
-                                                     (= (:shape-ref child) ref-child-id)))
+                                                   (if child-id
+                                                     (let [child (ctn/get-shape page child-id)]
+                                                       (= (:shape-ref child) ref-child-id))
+                                                     false))
                                         equal? (every? matches? (d/zip-all (:shapes shape) (:shapes ref-shape)))]
                                       (when (and (not equal?) (not (cph/touched-group? shape :shapes-group)))
                                         (println " -> set touched " (:name shape) (:id shape) :shapes :shapes-group))