emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] master b09deaa: * test/automated/package-test.el (package-


From: Glenn Morris
Subject: [Emacs-diffs] master b09deaa: * test/automated/package-test.el (package-test-update-archives-async):
Date: Tue, 28 Apr 2015 01:33:10 +0000

branch: master
commit b09deaa5a9d54658f6432b0a5aa45c834e162c43
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>

    * test/automated/package-test.el (package-test-update-archives-async):
    
    Try to handle the test server script dying.
---
 test/automated/package-test.el |    5 ++++-
 1 files changed, 4 insertions(+), 1 deletions(-)

diff --git a/test/automated/package-test.el b/test/automated/package-test.el
index 4385ee0..1f8f8ac 100644
--- a/test/automated/package-test.el
+++ b/test/automated/package-test.el
@@ -361,10 +361,13 @@ Must called from within a `tar-mode' buffer."
                (while package--downloads-in-progress
                  (accept-process-output nil 1))
                nil))
+            ;; If the server process died, there's some non-Emacs problem.
+            ;; Eg maybe the port was already in use.
+            (skip-unless (process-live-p process))
             (goto-char (point-min))
             (should
              (search-forward-regexp "^ +simple-single" nil t)))
-        (kill-process process)))))
+        (if (process-live-p process) (kill-process process))))))
 
 (ert-deftest package-test-describe-package ()
   "Test displaying help for a package."



reply via email to

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