next: Restore quickdocs search-engine.

master
Pierre Neidhardt 2019-10-03 15:55:32 +02:00
parent 89d7461945
commit eeaf68ae64
1 changed files with 5 additions and 7 deletions

View File

@ -96,10 +96,8 @@ Videos are downloaded with `+youtube-dl-command+'."
"syndication.twitter.com"
"m.media-amazon.com")))
(defun set-buffer-cookies-path (buffer)
(declare (ignore buffer))
;; (setf (cookies-path buffer) #P"")
)
(defun no-cookies-handler (buffer)
(setf (cookies-path buffer) #P""))
(defun my-buffer-defaults (buffer)
@ -150,7 +148,7 @@ Videos are downloaded with `+youtube-dl-command+'."
("mba" . "http://musicbrainz.org/search?query=~a&type=artist&method=indexed")
("mbr" . "http://musicbrainz.org/search?query=~a&type=release&method=indexed")
("osm" . "https://www.openstreetmap.org/search?query=~a")
;; ("q" . "http://quickdocs.org/search?q=~a")
("q" . "http://quickdocs.org/search?q=~a")
("s" . "http://stackoverflow.com/search?q=~a")
("wp" . "http://www.wikipedia.org/search-redirect.php?language=en&go=Go&search=~a")
("wb" . "http://en.wikibooks.org/wiki/Special:Search?search=~a")
@ -160,8 +158,8 @@ Videos are downloaded with `+youtube-dl-command+'."
(search-engines *interface*)))
(setf (download-directory *interface*) "~/temp")
;; (setf (history-path *interface*) "/home/ambrevar/temp/next/history.lisp")
(hooks:add-to-hook (hooks:object-hook *interface* 'buffer-before-make-hook)
#'set-buffer-cookies-path)
;; (hooks:add-to-hook (hooks:object-hook *interface* 'buffer-before-make-hook)
;; #'no-cookies-handler)
(hooks:add-to-hook (hooks:object-hook *interface* 'buffer-make-hook)
#'my-buffer-defaults)
(hooks:add-to-hook (hooks:object-hook *interface* 'minibuffer-make-hook)