|
|
@@ -1560,7 +1560,7 @@
|
|
|
editing-page (and block
|
|
|
(when-let [page-id (:db/id (:block/page block))]
|
|
|
(:block/name (db/entity page-id))))
|
|
|
- pages (search/page-search q 20)]
|
|
|
+ pages (search/page-search q 100)]
|
|
|
(if editing-page
|
|
|
;; To prevent self references
|
|
|
(remove (fn [p] (= (util/page-name-sanity-lc p) editing-page)) pages)
|