enhance: smaller block icon when collapsed

src/main/frontend/components/block.cljs

@@ -2092,7 +2092,8 @@
                                      " hide-inner-bullet")
                                    (when order-list? " as-order-list typed-list"))}
 
-                      (let [icon (icon-component/get-node-icon-cp block {:size 16 :color? true})]
+                      (let [icon-size (if collapsed? 12 14)
+                            icon (icon-component/get-node-icon-cp block {:size icon-size :color? true})]
                         (cond
                           (and (some? icon)
                                (or (db/page? block)

src/main/frontend/components/icon.cljs

@@ -60,7 +60,7 @@
 
 (defn get-node-icon-cp
   [node-entity opts]
-  (let [opts' (assoc opts :size 14)
+  (let [opts' (merge {:size 14} opts)
         node-icon (get-node-icon node-entity)]
     (when-not (or (string/blank? node-icon) (and (contains? #{"letter-n" "page"} node-icon) (:not-text-or-page? opts)))
       [:span.icon-cp-container