From 63608efe7eec4a0c53d2de7308e8b5f17318f7b5 Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Tue, 30 Mar 2021 23:44:48 +0200 Subject: Remove redundant #' before lambda in cedet * lisp/cedet/mode-local.el (mode-local-map-mode-buffers) (mode-local--activate-bindings, mode-local--deactivate-bindings) (setq-mode-local, describe-mode-local-bindings-in-mode): * lisp/cedet/semantic.el (semantic-repeat-parse-whole-stream): * lisp/cedet/semantic/bovine/c.el (semantic-c-describe-environment): * lisp/cedet/semantic/db-ebrowse.el (semanticdb-ebrowse-get-ebrowse-structure): * lisp/cedet/semantic/db-global.el (semanticdb-enable-gnu-global-databases): * lisp/cedet/semantic/edit.el (semantic-changes-in-region): * lisp/cedet/semantic/fw.el (semantic-install-function-overrides): * lisp/cedet/semantic/grammar.el (semantic-grammar-ASSOC) (semantic-grammar-tag-symbols, semantic-grammar-keywords) (semantic--grammar-macros-regexp-1) (semantic-format-tag-summarize): * lisp/cedet/semantic/idle.el (semantic-idle-core-handler) (semantic-idle-work-core-handler): * lisp/cedet/semantic/imenu.el (semantic-imenu-semanticdb-hook): * lisp/cedet/semantic/java.el (semantic-java-doc-keywords-map) (semantic-java-doc-setup): * lisp/cedet/semantic/lex-spp.el (semantic-lex-spp-save-table) (semantic-lex-spp-macros): * lisp/cedet/semantic/lex.el (semantic-lex-map-symbols) (semantic-lex-keywords, semantic-lex-types): * lisp/cedet/semantic/util-modes.el (semantic-toggle-minor-mode-globally): * lisp/cedet/semantic/wisent/comp.el (wisent-defcontext) (wisent-automaton-lisp-form): * lisp/cedet/semantic/wisent/grammar.el (wisent-grammar-assocs) (wisent-grammar-terminals): Remove redundant #' before lambda. --- lisp/cedet/semantic/java.el | 50 ++++++++++++++++++++++----------------------- 1 file changed, 25 insertions(+), 25 deletions(-) (limited to 'lisp/cedet/semantic/java.el') diff --git a/lisp/cedet/semantic/java.el b/lisp/cedet/semantic/java.el index 8cadffa09b6..f48b835fe39 100644 --- a/lisp/cedet/semantic/java.el +++ b/lisp/cedet/semantic/java.el @@ -395,11 +395,11 @@ receives two arguments: the javadoc keyword and its associated removed from the result list." (delq nil (mapcar - #'(lambda (k) - (let* ((tag (semantic-java-doc-tag k)) - (plist (semantic-lex-keyword-get tag 'javadoc))) - (if (or (not property) (plist-get plist property)) - (funcall fun k plist)))) + (lambda (k) + (let* ((tag (semantic-java-doc-tag k)) + (plist (semantic-lex-keyword-get tag 'javadoc))) + (if (or (not property) (plist-get plist property)) + (funcall fun k plist)))) semantic-java-doc-line-tags))) @@ -417,59 +417,59 @@ removed from the result list." (or semantic-java-doc-with-name-tags (setq semantic-java-doc-with-name-tags (semantic-java-doc-keywords-map - #'(lambda (k _p) k) + (lambda (k _p) k) 'with-name))) (or semantic-java-doc-with-ref-tags (setq semantic-java-doc-with-ref-tags (semantic-java-doc-keywords-map - #'(lambda (k _p) k) + (lambda (k _p) k) 'with-ref))) (or semantic-java-doc-extra-type-tags (setq semantic-java-doc-extra-type-tags (semantic-java-doc-keywords-map - #'(lambda (k p) - (if (memq 'type (plist-get p 'usage)) - k)) + (lambda (k p) + (if (memq 'type (plist-get p 'usage)) + k)) 'opt))) (or semantic-java-doc-extra-function-tags (setq semantic-java-doc-extra-function-tags (semantic-java-doc-keywords-map - #'(lambda (k p) - (if (memq 'function (plist-get p 'usage)) - k)) + (lambda (k p) + (if (memq 'function (plist-get p 'usage)) + k)) 'opt))) (or semantic-java-doc-extra-variable-tags (setq semantic-java-doc-extra-variable-tags (semantic-java-doc-keywords-map - #'(lambda (k p) - (if (memq 'variable (plist-get p 'usage)) - k)) + (lambda (k p) + (if (memq 'variable (plist-get p 'usage)) + k)) 'opt))) (or semantic-java-doc-type-tags (setq semantic-java-doc-type-tags (semantic-java-doc-keywords-map - #'(lambda (k p) - (if (memq 'type (plist-get p 'usage)) - k))))) + (lambda (k p) + (if (memq 'type (plist-get p 'usage)) + k))))) (or semantic-java-doc-function-tags (setq semantic-java-doc-function-tags (semantic-java-doc-keywords-map - #'(lambda (k p) - (if (memq 'function (plist-get p 'usage)) - k))))) + (lambda (k p) + (if (memq 'function (plist-get p 'usage)) + k))))) (or semantic-java-doc-variable-tags (setq semantic-java-doc-variable-tags (semantic-java-doc-keywords-map - #'(lambda (k p) - (if (memq 'variable (plist-get p 'usage)) - k))))) + (lambda (k p) + (if (memq 'variable (plist-get p 'usage)) + k))))) ) -- cgit v1.2.3