[Emacs-diffs] scratch/merge-cedet-tests d3a0e00 219/316: Erorr when appropriate

[Edward John Steere]

branch: scratch/merge-cedet-tests
commit d3a0e00b9f494dd3d29351ba753c59aa67330803
Author: Eric Ludlam <address@hidden>
Commit: Edward John Steere <address@hidden>

    Erorr when appropriate
    
    * test/manual/cedet/cedet-uutil.el: (cedet-utest-log-shutdown): This
     should error when there are errors. (cedet-utest-log): Doc fix.
---
 test/manual/cedet/cedet-uutil.el |   10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/test/manual/cedet/cedet-uutil.el b/test/manual/cedet/cedet-uutil.el
index eca795e..2666c2d 100644
--- a/test/manual/cedet/cedet-uutil.el
+++ b/test/manual/cedet/cedet-uutil.el
@@ -1,6 +1,6 @@
 ;;; cedet-uutil.el --- Unit test utilities for the CEDET suite.
 ;;
-;; Copyright (C) 2011 Eric M. Ludlam
+;; Copyright (C) 2011, 2014 Eric M. Ludlam
 ;;
 ;; Author: Eric M. Ludlam <address@hidden>
 ;;
@@ -100,6 +100,11 @@ ERRORCONDITION is some error that may have occured durinig 
testing."
        )
     (cedet-utest-log-shutdown-msg title cedet-utest-log-timer endtime)
     (setq cedet-utest-log-timer nil)
+
+    ;; If this isn't working in batch mode for testing, perhaps
+    ;; we can use an output message, and collect errors to the
+    ;; very end?
+    (when errorcondition (error errorcondition))
     ))
 
 (defun cedet-utest-log-shutdown-msg (title startime endtime)
@@ -214,7 +219,8 @@ Optional argument PRECR indicates to prefix the done msg w/ 
a newline."
 
 (defun cedet-utest-log(format &rest args)
   "Log the text string FORMAT.
-The rest of the ARGS are used to fill in FORMAT with `format'."
+The rest of the ARGS are used to fill in FORMAT with `format'.
+Makes sure the log entry is on its own line, and ends in a CR."
   (if (cedet-utest-noninteractive)
       (apply 'message format args)
     (save-excursion