Don't make inability to unfurl url a user's problem

Signed-off-by: Volodymyr Kozieiev <vkjr.sp@gmail.com>

src/status_im/chat/models/link_preview.cljs

@@ -23,16 +23,17 @@
             {::json-rpc/call [{:method     (json-rpc/call-ext-method "getLinkPreviewData")
                                :params     [link]
                                :on-success #(re-frame/dispatch [::cache-link-preview-data link %])
-                               :on-error   #(log/error "Can't get preview data for " link)}]}))
+                               :on-error   #(re-frame/dispatch [::cache-link-preview-data
+                                                                link
+                                                                {:error (str  "Can't get preview data for " link)}])}]}))
 
 (fx/defn cache-link-preview-data
   {:events [::cache-link-preview-data]}
-  [{{:keys [multiaccount]} :db :as cofx} site {:keys [error] :as data}]
+  [{{:keys [multiaccount]} :db :as cofx} site data]
-  (when-not error
   (multiaccounts.update/optimistic
    cofx
    :link-previews-cache
-     (assoc (get multiaccount :link-previews-cache {}) site data))))
+   (assoc (get multiaccount :link-previews-cache {}) site data)))
 
 (fx/defn should-suggest-link-preview
   {:events [::should-suggest-link-preview]}

src/status_im/ui/screens/chat/message/link_preview.cljs

@@ -59,13 +59,13 @@
 
 (defview link-preview-loader [link outgoing]
   (letsubs [cache [:link-preview/cache]]
-    (let [{:keys [site title thumbnailUrl] :as preview-data} (get cache link)]
+    (let [{:keys [site title thumbnailUrl error] :as preview-data} (get cache link)]
       (if (not preview-data)
         (do
           (re-frame/dispatch
            [::link-preview/load-link-preview-data link])
           nil)
-
+        (when-not error
           [react/touchable-highlight
            {:on-press #(when (and (security/safe-link? link))
                          (re-frame/dispatch
@@ -81,7 +81,7 @@
             [quo/text {:size :small
                        :color :secondary
                        :style styles/link-preview-site}
-           site]]]))))
+             site]]])))))
 
 (defview link-preview-wrapper [links outgoing]
   (letsubs