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

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

[nongnu] elpa/drupal-mode 83ee02f80a 024/308: Renamed `drupal-root' to `


From: ELPA Syncer
Subject: [nongnu] elpa/drupal-mode 83ee02f80a 024/308: Renamed `drupal-root' to `drupal-rootdir'.
Date: Tue, 25 Jan 2022 10:59:03 -0500 (EST)

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

    Renamed `drupal-root' to `drupal-rootdir'.
---
 drupal-mode.el  | 8 ++++----
 drupal/etags.el | 6 +++---
 drupal/gtags.el | 4 ++--
 3 files changed, 9 insertions(+), 9 deletions(-)

diff --git a/drupal-mode.el b/drupal-mode.el
index b028fbe96d..8a72d16f6a 100644
--- a/drupal-mode.el
+++ b/drupal-mode.el
@@ -111,9 +111,9 @@ According to http://drupal.org/coding-standards#indenting.";
 (make-variable-buffer-local 'drupal-version)
 (put 'drupal-version 'safe-local-variable 'string-or-null-p)
 
-(defvar drupal-root nil "Drupal project root as auto detected.")
-(make-variable-buffer-local 'drupal-root)
-(put 'drupal-root 'safe-local-variable 'string-or-null-p)
+(defvar drupal-rootdir nil "Drupal project rootdir as auto detected.")
+(make-variable-buffer-local 'drupal-rootdir)
+(put 'drupal-rootdir 'safe-local-variable 'string-or-null-p)
 
 (defvar drupal-mode-map
   (let ((map (make-sparse-keymap)))
@@ -255,7 +255,7 @@ should save your files with unix style end of line."
                   (goto-char (point-min))
                   (when (re-search-forward "\\(define('VERSION',\\|const 
VERSION =\\) +'\\(.+\\)'" nil t)
                     (dir-locals-set-class-variables 'drupal-class `((nil . 
((drupal-version . ,(match-string-no-properties 2))
-                                                                            
(drupal-root . ,dir)))))
+                                                                            
(drupal-rootdir . ,dir)))))
                     (dir-locals-set-directory-class dir 'drupal-class)))
                 (setq drupal-version (match-string-no-properties 2))
                 )))
diff --git a/drupal/etags.el b/drupal/etags.el
index cb8d06f068..c816ddb7a0 100644
--- a/drupal/etags.el
+++ b/drupal/etags.el
@@ -8,9 +8,9 @@
 
 (defun drupal/etags-enable ()
   "Setup TAGS file for etags if it exists in DRUPAL_ROOT."
-  (when (and (boundp 'drupal-root)
-            (file-exists-p (concat drupal-root "TAGS")))
-    (setq tags-file-name (concat drupal-root "TAGS"))))
+  (when (and (boundp 'drupal-rootdir)
+            (file-exists-p (concat drupal-rootdir "TAGS")))
+    (setq tags-file-name (concat drupal-rootdir "TAGS"))))
 
 (add-hook 'drupal-mode-hook 'drupal/etags-enable)
 
diff --git a/drupal/gtags.el b/drupal/gtags.el
index 57bd0932a6..6d55af4126 100644
--- a/drupal/gtags.el
+++ b/drupal/gtags.el
@@ -8,8 +8,8 @@
 
 (defun drupal/gtags-enable ()
   "Setup rootdir for gtags to be DRUPAL_ROOT."
-  (when (boundp 'drupal-root)
-    (setq gtags-rootdir drupal-root)))
+  (when (boundp 'drupal-rootdir)
+    (setq gtags-rootdir drupal-rootdir)))
 
 (add-hook 'drupal-mode-hook 'drupal/gtags-enable)
 



reply via email to

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