diff options
author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2017-03-22 10:58:19 +0100 |
---|---|---|
committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2017-03-22 10:58:19 +0100 |
commit | 75a783771d8b1144cee8f3343ec97638da3bc9b0 (patch) | |
tree | 923d82805ff7941eb6d6b43779377069293f6ddd /helm-font.el | |
parent | f2d58e79bafe48fd554e6b422a08c97379075831 (diff) |
Use assq and memq where needed.
* helm-adaptive.el (helm-adapt-use-adaptive-p): Do it.
* helm-bookmark.el (helm-bookmark-image-bookmark-p): Do it.
* helm-font.el (helm-source-xfonts): Do it.
* helm-net.el (helm-google-suggest-parser): Do it.
(helm-wikipedia--parse-summary): Do it.
* helm.el (helm-initialize): Do it.
(helm-get-cached-candidates): Do it.
(helm-update): Do it.
(helm-update-source-p): Do it.
(helm-output-filter--process-source): Do it.
(helm-execute-selection-action-1): Do it.
(helm-file-completion-source-p): Do it.
Diffstat (limited to 'helm-font.el')
-rw-r--r-- | helm-font.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/helm-font.el b/helm-font.el index 3179ff95..029b390a 100644 --- a/helm-font.el +++ b/helm-font.el @@ -52,7 +52,7 @@ (setq helm-xfonts-cache (x-list-fonts "*"))) ;; Save current font so it can be restored in cleanup - (setq helm-previous-font (cdr (assoc 'font (frame-parameters))))) + (setq helm-previous-font (cdr (assq 'font (frame-parameters))))) :candidates 'helm-xfonts-cache :action '(("Copy font to kill ring" . (lambda (elm) (kill-new elm))) |