~string= for test in cl-pushnew lookup-provider

:test string= makes it so cl-pushnew will test if there are any "Libgen"
records already in the alist before pushing. Basically, unique records.
This commit is contained in:
AChavali
2020-02-08 13:09:49 +00:00
parent 116cfec811
commit ee610c65c4

View File

@@ -28,8 +28,9 @@ Load the literate.el file to start parsing.
(setq display-line-numbers-type nil)
(display-battery-mode 1)
(setq-default frame-title-format '("%b - εmacs"))
(cl-pushnew '("Libgen" "https://libgen.me/search/all?search=%s") +lookup-provider-url-alist :key #'car)
(cl-pushnew '("Libgen" "https://libgen.me/search/all?search=%s") +lookup-provider-url-alist :key #'car :test 'string=)
#+END_SRC
Some quality of life things and others that I couldn't really put in one category
- Displaying line numbers isn't usually something I do. If need be, I'll just
open them with *<SPC>tl*.