summaryrefslogtreecommitdiff
path: root/helm-dabbrev.el
diff options
context:
space:
mode:
authorThierry Volpiatto <thierry.volpiatto@gmail.com>2015-09-30 08:03:24 +0200
committerThierry Volpiatto <thierry.volpiatto@gmail.com>2015-09-30 08:03:24 +0200
commit3ee3df4e9596bb8344e2569cf68376453d57251e (patch)
tree0e53d37eb772c6bcca51bda96a295a864cfa5008 /helm-dabbrev.el
parent69b8170db414daabc3d301b328aa87d186c8d742 (diff)
Unquote lambda's.
Diffstat (limited to 'helm-dabbrev.el')
-rw-r--r--helm-dabbrev.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/helm-dabbrev.el b/helm-dabbrev.el
index 72928ab2..7e768d93 100644
--- a/helm-dabbrev.el
+++ b/helm-dabbrev.el
@@ -158,7 +158,7 @@ but the initial search for all candidates in buffer(s)."
(minibuf (minibufferp buffer1))
result pos-before pos-after
(search-and-store
- #'(lambda (pattern direction)
+ (lambda (pattern direction)
(while (cl-case direction
(1 (search-forward pattern nil t))
(-1 (search-backward pattern nil t))
@@ -230,7 +230,7 @@ but the initial search for all candidates in buffer(s)."
(defun helm-dabbrev--get-candidates (abbrev)
(cl-assert abbrev nil "[No Match]")
(with-current-buffer (current-buffer)
- (let* ((dabbrev-get #'(lambda (str all-bufs)
+ (let* ((dabbrev-get (lambda (str all-bufs)
(helm-dabbrev--collect
str helm-candidate-number-limit
(cl-case helm-dabbrev-case-fold-search
@@ -267,7 +267,7 @@ but the initial search for all candidates in buffer(s)."
(zerop helm-dabbrev-cycle-threshold)))
(helm-execute-action-at-once-if-one t)
(helm-quit-if-no-candidate
- #'(lambda ()
+ (lambda ()
(message "[Helm-dabbrev: No expansion found]"))))
(cl-assert (and (stringp dabbrev) (not (string= dabbrev "")))
nil "[Helm-dabbrev: Nothing found before point]")