¥
Size: a a a
2021 November 02
Aß
регексп должен матчится, может проблемы фонт лока
¥
(setq-local font-lock-multiline t) решило проблему лолDL
о, гитхаб запилил M-x aka command palette
Aß
можешь затестить ещё это?
(defun my-uniq (sequence &optional testfn)
(let ((len (length sequence))
result)
(if (and (< 32 len) (memq testfn '(nil eq eql equal)))
(let ((hash (make-hash-table :size len
:test (or testfn 'equal))))
(seq-doseq (elt sequence)
(unless (gethash elt hash)
(push elt result)
(puthash elt t hash))))
(seq-doseq (elt sequence)
(unless (seq-contains-p result elt testfn)
(push elt result))))
(nreverse result)))DL
Debugger entered--Lisp error: (void-function seq-contains-p)
Aß
load-library seq
DL
vs 0.8 у даши
Aß
нормально
Aß
так, падажжи
Aß
у тебя же equal-including-properties
Aß
на него не работают оптимизации
DL
(benchmark-run 1
(my-uniq
(cl-delete-if-not counsel-yank-pop-filter kill-ring)
#'equal-including-properties))
(benchmark-run 1
(let ((-compare-fn #'equal-including-properties))
(-distinct (cl-delete-if-not counsel-yank-pop-filter kill-ring))))
T
Как отследить почему не работает дополнение в org-roam?