Browse Source

fix: some lint errors

Tienson Qin 4 years ago
parent
commit
2c1e3765cb

+ 13 - 12
src/main/frontend/components/datetime.cljs

@@ -55,18 +55,19 @@
                       (let [value (util/evalue event)]
                         (swap! *timestamp assoc-in [:repeater :num] value)))}]
        (ui/select
-        (mapv
-         (fn [item]
-           (if (= (:label item) duration)
-             (assoc item :selected "selected")
-             item))
-         [{:label "h"}
-          {:label "d"}
-          {:label "w"}
-          {:label "m"}
-          {:label "y"}])
-        (fn [value]
-          (swap! *timestamp assoc-in [:repeater :duration] value)))
+         (mapv
+          (fn [item]
+            (if (= (:label item) duration)
+              (assoc item :selected "selected")
+              item))
+          [{:label "h"}
+           {:label "d"}
+           {:label "w"}
+           {:label "m"}
+           {:label "y"}])
+         (fn [value]
+           (swap! *timestamp assoc-in [:repeater :duration] value))
+         nil)
 
        [:a.ml-2.self-center {:on-click (fn []
                                          (reset! *show-repeater? false)

+ 2 - 2
src/main/frontend/components/editor.cljs

@@ -150,7 +150,7 @@
                                             (editor-handler/get-matched-blocks q (:block/uuid edit-block)))]
                      (reset! result matched-blocks)))
                  state)}
-  [state edit-block input id q format content]
+  [state edit-block input id q format]
   (let [result (rum/react (get state ::result))
         chosen-handler (editor-handler/block-on-chosen-handler input id q format)
         non-exist-block-handler (editor-handler/block-non-exist-handler input)]
@@ -166,7 +166,7 @@
                              repo (state/sub :git/current-repo)
                              format (db/get-page-format page)]
 
-                         [:.py-2 (search/block-search-result-item repo uuid format content q)]))
+                         [:.py-2 (search/block-search-result-item repo uuid format content q :block)]))
         :class       "black"}))))
 
 (rum/defcs block-search < rum/reactive

+ 1 - 0
src/main/frontend/components/header.cljs

@@ -113,6 +113,7 @@
           :icon svg/logout-sm})]
       (concat page-menu-and-hr)
       (remove nil?))
+     {}
      ;; {:links-footer (when (and (util/electron?) (not logged?))
      ;;                  [:div.px-2.py-2 (login logged?)])}
      )))

+ 2 - 1
src/main/frontend/components/page.cljs

@@ -485,7 +485,8 @@
                                                         (reset! *focus-nodes [])
                                                         (reset! *n-hops nil)
                                                         (state/clear-search-filters!))}
-                 "Reset Graph"]]])))
+                 "Reset Graph"]]]))
+           {})
           (graph-filter-section
            [:span.font-medium "Search"]
            (fn [open?]

+ 1 - 1
src/main/frontend/components/reference.cljs

@@ -74,7 +74,7 @@
                  filters (when page-name
                            (atom (page-handler/get-filters (string/lower-case page-name))))]
              (assoc state ::filters filters)))}
-  [state page-name marker? priority?]
+  [state page-name marker?]
   (when page-name
     (let [page-name (string/lower-case page-name)
           repo (state/get-current-repo)

+ 1 - 1
src/main/frontend/handler/events.cljs

@@ -179,7 +179,7 @@
     (state/set-modal! #(git-component/file-specific-version path hash content))))
 
 (defmethod handle :after-db-restore [[_ repos]]
-  (mapv (fn [{url :url} repo]
+  (mapv (fn [{url :url}]
           ;; compare :ast/version
           (let [db (conn/get-conn url)
                 ast-version (:v (first (d/datoms db :aevt :ast/version)))]

+ 2 - 2
src/main/frontend/handler/extract.cljs

@@ -197,7 +197,7 @@
                  (let [block-refs (if refresh? (set refs)
                                       (set/intersection (set refs) block-ids-set))]
                    (set/union
-                    (filter :block/name refs)
+                    (set (filter :block/name refs))
                     block-refs)))]
     (-> block
         (update :block/refs aux-fn)
@@ -207,7 +207,7 @@
   [repo-url files metadata refresh?]
   (when (seq files)
     (-> (p/all (map
-                 (fn [{:file/keys [path content]} contents]
+                 (fn [{:file/keys [path content]}]
                    (when content
                      (let [org? (= "org" (string/lower-case (util/get-file-ext path)))
                            content (if org?

+ 1 - 1
src/main/frontend/modules/outliner/core.cljs

@@ -575,7 +575,7 @@
              ;; direct outdenting (the old behavior)
              (let [right-siblings (get-right-siblings last-node)
                    right-siblings (doall
-                                   (map (fn [sibling right-siblings]
+                                   (map (fn [sibling]
                                           (some->
                                            (tree/-set-parent-id sibling last-node-id)
                                            (tree/-save txs-state)))