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

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

[elpa] externals/phps-mode 04d328b: Improved error reporting with asynch


From: Christian Johansson
Subject: [elpa] externals/phps-mode 04d328b: Improved error reporting with asynchronous threads
Date: Thu, 20 Feb 2020 04:12:32 -0500 (EST)

branch: externals/phps-mode
commit 04d328b0b2a37f80e4fffc62e902a1df323b165c
Author: Christian Johansson <address@hidden>
Commit: Christian Johansson <address@hidden>

    Improved error reporting with asynchronous threads
---
 phps-mode-serial.el | 13 +++----------
 phps-mode.el        |  8 +++-----
 2 files changed, 6 insertions(+), 15 deletions(-)

diff --git a/phps-mode-serial.el b/phps-mode-serial.el
index 5b5ce77..3f9a363 100644
--- a/phps-mode-serial.el
+++ b/phps-mode-serial.el
@@ -127,14 +127,11 @@
                        (elapsed (- end-time-float start-time-float)))
                   (message "Serial asynchronous thread start finished, 
elapsed: %fs" elapsed))
 
-                ;; (setq start-time (current-time))
-
                 (let ((status (car start-return))
                       (value (car (cdr start-return)))
                       (start-time (car (cdr (cdr start-return)))))
 
                   (when (string= status "success")
-                    
                     ;; Then execute end lambda
                     (condition-case conditions
                         (let ((return (funcall end value)))
@@ -154,10 +151,10 @@
                           (value (car (cdr end-return))))
 
                       (when (string= status "error")
-                        (display-warning 'phps-mode (format "%s" (car 
value)))))
+                        (display-warning 'phps-mode (format "%s" (car 
value))))))
 
-                    (when (string= status "error")
-                      (display-warning 'phps-mode (format "%s" (car 
value))))))))
+                  (when (string= status "error")
+                    (display-warning 'phps-mode (format "%s" (car value)))))))
             key)
            phps-mode-serial--async-threads))
 
@@ -184,12 +181,8 @@
               (value (car (cdr start-return)))
               (start-time (car (cdr (cdr start-return)))))
 
-          ;; (message "Return: %s" start-return)
-
           (when (string= status "success")
 
-            ;; (setq start-time (current-time))
-
             ;; Then execute end lambda
             (condition-case conditions
                 (let ((return (funcall end value)))
diff --git a/phps-mode.el b/phps-mode.el
index d0fe190..36d5646 100644
--- a/phps-mode.el
+++ b/phps-mode.el
@@ -5,8 +5,8 @@
 ;; Author: Christian Johansson <address@hidden>
 ;; Maintainer: Christian Johansson <address@hidden>
 ;; Created: 3 Mar 2018
-;; Modified: 19 Feb 2020
-;; Version: 0.3.35
+;; Modified: 20 Feb 2020
+;; Version: 0.3.36
 ;; Keywords: tools, convenience
 ;; URL: https://github.com/cjohansson/emacs-phps-mode
 
@@ -231,9 +231,7 @@
 
   ;; Disable idle scheduler since we have customized this feature
   (when (boundp 'semantic-idle-scheduler-mode)
-    (setq semantic-idle-scheduler-mode nil))
-
-)
+    (setq semantic-idle-scheduler-mode nil)))
 
 (provide 'phps-mode)
 ;;; phps-mode.el ends here



reply via email to

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