emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/drupal-mode 6a7322f581 052/308: Optimized for byte-compile


From: ELPA Syncer
Subject: [nongnu] elpa/drupal-mode 6a7322f581 052/308: Optimized for byte-compile by using #' shorthand.
Date: Tue, 25 Jan 2022 10:59:22 -0500 (EST)

branch: elpa/drupal-mode
commit 6a7322f581996bf2f70ae60a81071195123c44e3
Author: Arne Jørgensen <arne@arnested.dk>
Commit: Arne Jørgensen <arne@arnested.dk>

    Optimized for byte-compile by using #' shorthand.
---
 drupal-mode.el          | 16 ++++++++--------
 drupal/etags.el         |  4 ++--
 drupal/flymake-phpcs.el |  2 +-
 drupal/gtags.el         |  2 +-
 drupal/ispell.el        |  2 +-
 5 files changed, 13 insertions(+), 13 deletions(-)

diff --git a/drupal-mode.el b/drupal-mode.el
index 7957bec46c..8123ffba4c 100644
--- a/drupal-mode.el
+++ b/drupal-mode.el
@@ -146,10 +146,10 @@ Include path to the executable if it is not in your 
$PATH."
 
 (defvar drupal-mode-map
   (let ((map (make-sparse-keymap)))
-    (define-key map "\C-cdf" 'drupal-search-documentation)
-    (define-key map "\C-cdc" 'drupal-drush-cache-clear)
-    (define-key map "\C-cdih" 'drupal-insert-hook)
-    (define-key map "\C-cdif" 'drupal-insert-function)
+    (define-key map "\C-cdf" #'drupal-search-documentation)
+    (define-key map "\C-cdc" #'drupal-drush-cache-clear)
+    (define-key map "\C-cdih" #'drupal-insert-hook)
+    (define-key map "\C-cdif" #'drupal-insert-function)
     map)
   "Keymap for `drupal-mode'")
 
@@ -173,12 +173,12 @@ Include path to the executable if it is not in your 
$PATH."
 
   ;; Delete trailing white space.
   (when (eq drupal-delete-trailing-whitespace 'always)
-    (add-hook 'before-save-hook 'delete-trailing-whitespace nil t))
+    (add-hook 'before-save-hook #'delete-trailing-whitespace nil t))
   (when (eq drupal-delete-trailing-whitespace 'never)
-    (remove-hook 'before-save-hook 'delete-trailing-whitespace t))
+    (remove-hook 'before-save-hook #'delete-trailing-whitespace t))
 
   ;; Handle line ending and trailing white space.
-  (add-hook 'before-save-hook 'drupal-convert-line-ending nil t)
+  (add-hook 'before-save-hook #'drupal-convert-line-ending nil t)
 
   ;; Stuff special for php-mode buffers.
   (when (eq major-mode 'php-mode)
@@ -468,7 +468,7 @@ mode-hook, i.e.
 
 ;;;###autoload
 (eval-after-load 'php-mode
-  '(add-hook 'php-mode-hook 'drupal-mode-bootstrap))
+  '(add-hook 'php-mode-hook #'drupal-mode-bootstrap))
 
 ;;;###autoload
 (progn
diff --git a/drupal/etags.el b/drupal/etags.el
index 540c7358e9..c250174d27 100644
--- a/drupal/etags.el
+++ b/drupal/etags.el
@@ -18,9 +18,9 @@
 
     ;; Set `drupal-symbol-collection' to `tags-completion-table' so
     ;; that inserting hooks will do completion based on etags.
-    (setq drupal-symbol-collection 'tags-completion-table)))
+    (setq drupal-symbol-collection #'tags-completion-table)))
 
-(add-hook 'drupal-mode-hook 'drupal/etags-enable)
+(add-hook 'drupal-mode-hook #'drupal/etags-enable)
 
 
 
diff --git a/drupal/flymake-phpcs.el b/drupal/flymake-phpcs.el
index 8cfd39f1bb..40baf3bcf4 100644
--- a/drupal/flymake-phpcs.el
+++ b/drupal/flymake-phpcs.el
@@ -38,7 +38,7 @@
     (add-to-list 'flymake-allowed-file-name-masks
                  `(,(concat "\\." (file-name-extension (buffer-file-name)) 
"\\'") flymake-phpcs-init))))
 
-(add-hook 'drupal-mode-hook 'drupal/flymake-phpcs-enable)
+(add-hook 'drupal-mode-hook #'drupal/flymake-phpcs-enable)
 
 
 
diff --git a/drupal/gtags.el b/drupal/gtags.el
index 6309218e42..c87e6906c1 100644
--- a/drupal/gtags.el
+++ b/drupal/gtags.el
@@ -13,7 +13,7 @@
   (when (boundp 'drupal-rootdir)
     (setq gtags-rootdir drupal-rootdir)))
 
-(add-hook 'drupal-mode-hook 'drupal/gtags-enable)
+(add-hook 'drupal-mode-hook #'drupal/gtags-enable)
 
 
 
diff --git a/drupal/ispell.el b/drupal/ispell.el
index 0c6701309b..49fb1f12c4 100644
--- a/drupal/ispell.el
+++ b/drupal/ispell.el
@@ -15,7 +15,7 @@ not `colour') according to 
http://drupal.org/coding-standards.";
   (when (member "american" (ispell-valid-dictionary-list))
     (setq ispell-local-dictionary "american")))
 
-(add-hook 'drupal-mode-hook 'drupal/ispell-enable)
+(add-hook 'drupal-mode-hook #'drupal/ispell-enable)
 
 
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]