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

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

[nongnu] elpa/drupal-mode bb47e5d71b 086/308: Replaced nested `if's with


From: ELPA Syncer
Subject: [nongnu] elpa/drupal-mode bb47e5d71b 086/308: Replaced nested `if's with `cond'.
Date: Tue, 25 Jan 2022 10:59:32 -0500 (EST)

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

    Replaced nested `if's with `cond'.
---
 drupal-mode.el | 26 +++++++++++++++-----------
 1 file changed, 15 insertions(+), 11 deletions(-)

diff --git a/drupal-mode.el b/drupal-mode.el
index a8e9a480d3..82e5258ada 100644
--- a/drupal-mode.el
+++ b/drupal-mode.el
@@ -386,14 +386,17 @@ should save your files with unix style end of line."
   (interactive)
   (let ((symbol (symbol-at-point)))
     (when symbol
-      (if (and drupal-drush-program
-               (string-match "drush" (symbol-name symbol)))
-          (browse-url
-           (format-spec drupal-drush-search-url `((?v . 
,(replace-regexp-in-string ".*-dev" "master" (replace-regexp-in-string 
"\.[0-9]+\\'" ".x" drupal-drush-version)))
-                                                  (?s . ,symbol))))
+      (cond
+       ((and (boundp 'php-extras-function-arguments)
+             (gethash (symbol-name symbol) php-extras-function-arguments))
+        (php-search-documentation))
+       ((and drupal-drush-program (string-match "drush" (symbol-name symbol)))
         (browse-url
-         (format-spec drupal-search-url `((?v . ,(drupal-major-version 
drupal-version))
-                                          (?s . ,symbol))))))))
+         (format-spec drupal-drush-search-url `((?v . 
,(replace-regexp-in-string ".*-dev" "master" (replace-regexp-in-string 
"\.[0-9]+\\'" ".x" drupal-drush-version)))
+                                                (?s . ,symbol)))))
+       (t (browse-url
+           (format-spec drupal-search-url `((?v . ,(drupal-major-version 
drupal-version))
+                                            (?s . ,symbol)))))))))
 
 
 
@@ -457,10 +460,11 @@ instead."
   (when drupal-get-function-args
     (let* ((symbol (php-get-pattern))
            (args (when symbol (funcall drupal-get-function-args symbol))))
-      (if args
-          (format "%s (%s)" symbol args)
-        (when (fboundp 'php-extras-eldoc-documentation-function)
-          (php-extras-eldoc-documentation-function))))))
+      (cond
+       (args
+        (format "%s (%s)" symbol args))
+       ((fboundp 'php-extras-eldoc-documentation-function)
+        (php-extras-eldoc-documentation-function))))))
 
 
 



reply via email to

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