From d3a0e00b9f494dd3d29351ba753c59aa67330803 Mon Sep 17 00:00:00 2001 From: Eric Ludlam Date: Tue, 3 Jun 2014 21:50:51 -0400 Subject: [PATCH] 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 eca795e00af..2666c2dd3f7 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 ;; @@ -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 -- 2.39.5