🐛 Fix crash on iOS when displaying viewer

CHANGES.md

@@ -1,5 +1,11 @@
 # CHANGELOG
 
+## 1.12.4-beta
+
+### :bug: Bugs fixed
+
+- Fix crash on iOS when displaying viewer [#1522](https://github.com/penpot/penpot/issues/1522)
+
 ## 1.12.3-beta
 
 ### :bug: Bugs fixed

frontend/src/app/main/ui/viewer.cljs

@@ -152,7 +152,7 @@
      (mf/deps fullscreen?)
      (fn []
        ;; Trigger dom fullscreen depending on our state
-       (let [wrapper     (dom/get-element "viewer-layout")
+       (let [wrapper         (dom/get-element "viewer-layout")
              fullscreen-dom? (dom/fullscreen?)]
          (when (not= fullscreen? fullscreen-dom?)
            (if fullscreen?

frontend/src/app/util/dom.cljs

@@ -6,13 +6,15 @@
 
 (ns app.util.dom
   (:require
-    [app.common.exceptions :as ex]
+   [app.common.geom.point :as gpt]
-    [app.common.geom.point :as gpt]
+   [app.common.logging :as log]
-    [app.util.globals :as globals]
+   [app.util.globals :as globals]
-    [app.util.object :as obj]
+   [app.util.object :as obj]
-    [cuerdas.core :as str]
+   [cuerdas.core :as str]
-    [goog.dom :as dom]
+   [goog.dom :as dom]
-    [promesa.core :as p]))
+   [promesa.core :as p]))
+
+(log/set-level! :warn)
 
 ;; --- Deprecated methods
 
@@ -289,8 +291,9 @@
     (boolean (.-fullscreenElement globals/document))
 
     :else
-    (ex/raise :type :not-supported
+    (do
-              :hint "seems like the current browser does not support fullscreen api.")))
+      (log/error :msg "Seems like the current browser does not support fullscreen api.")
+      false)))
 
 (defn ^boolean blob?
   [^js v]

frontend/src/app/util/webapi.cljs

@@ -8,11 +8,13 @@
   "HTML5 web api helpers."
   (:require
    [app.common.data :as d]
-   [app.common.exceptions :as ex]
+   [app.common.logging :as log]
    [app.util.object :as obj]
    [beicon.core :as rx]
    [cuerdas.core :as str]))
 
+(log/set-level! :warn)
+
 (defn- file-reader
   [f]
   (rx/create
@@ -114,8 +116,9 @@
     (.webkitRequestFullscreen el)
 
     :else
-    (ex/raise :type :not-supported
+    (do
-              :hint "seems like the current browser does not support fullscreen api.")))
+      (log/error :msg "Seems like the current browser does not support fullscreen api.")
+      false)))
 
 (defn exit-fullscreen
   []
@@ -127,8 +130,9 @@
     (.webkitExitFullscreen js/document)
 
     :else
-    (ex/raise :type :not-supported
+    (do
-              :hint "seems like the current browser does not support fullscreen api.")))
+      (log/error :msg "Seems like the current browser does not support fullscreen api.")
+      false)))
 
 (defn observe-resize
   [node]