diff --git a/backend/dev/user.clj b/backend/dev/user.clj
index 2b881cc4a..4f47934a8 100644
--- a/backend/dev/user.clj
+++ b/backend/dev/user.clj
@@ -95,33 +95,3 @@
    [{:v1 (alength (blob/encode data {:version 1}))
      :v2 (alength (blob/encode data {:version 2}))
      :v3 (alength (blob/encode data {:version 3}))}]))
-
-(defn update-page-1
-  [data]
-  (letfn [(find-empty-groups [objects]
-            (->> (vals objects)
-                 (filter (fn [shape]
-                           (and (= :group (:type shape))
-                                (or (empty? (:shapes shape))
-                                    (every? (fn [child-id]
-                                              (not (contains? objects child-id)))
-                                            (:shapes shape))))))
-                 (map :id)))
-
-          (update-page [[page-id page]]
-            (let [objects (:objects page)
-                  eids    (find-empty-groups objects)]
-
-              (map (fn [id]
-                     {:type :del-obj
-                      :page-id page-id
-                      :id id})
-                   eids)))]
-    (loop [i 0 data data]
-      (let [changes (mapcat update-page (:pages-index data))]
-        (prn "==== loop " i " ====")
-        (clojure.pprint/pprint changes)
-        (if (seq changes)
-          (recur (inc i)
-                 (app.common.pages.changes/process-changes data changes))
-          data)))))
diff --git a/backend/src/app/loggers/mattermost.clj b/backend/src/app/loggers/mattermost.clj
index 34120a360..fc0109bdd 100644
--- a/backend/src/app/loggers/mattermost.clj
+++ b/backend/src/app/loggers/mattermost.clj
@@ -63,15 +63,12 @@
   [cfg {:keys [host version id] :as cdata}]
   (try
     (let [uri  (:uri cfg)
-          text (str "Unhandled exception:\n"
-                    "- detail: " (cfg/get :public-uri) "/dbg/error-by-id/" id "\n"
-                    "- profile-id: `" (:profile-id cdata) "`\n"
-                    "- host: `" host "`\n"
-                    "- version: `" version "`\n")
-          rsp    (http/send! {:uri uri
-                              :method :post
-                              :headers {"content-type" "application/json"}
-                              :body (json/encode-str {:text text})})]
+          text (str "Unhandled exception (host: " host ", url: " (cfg/get :public-uri) "/dbg/error-by-id/" id "\n"
+                    "- profile-id: #" (:profile-id cdata) "\n")
+          rsp  (http/send! {:uri uri
+                            :method :post
+                            :headers {"content-type" "application/json"}
+                            :body (json/encode-str {:text text})})]
       (when (not= (:status rsp) 200)
         (l/error :hint "error on sending data to mattermost"
                  :response (pr-str rsp))))