[FYI] {testsuite-work} test defs: fix glitch in TAP version of `warn_' function

[Stefano Lattarini]

* tests/tap-functions.sh (warn_): Do not display the warning
message two times.
---
 ChangeLog              |    6 ++++++
 tests/tap-functions.sh |    5 ++++-
 2 files changed, 10 insertions(+), 1 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 79879ca..9759787 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,11 @@
 2011-09-07  Stefano Lattarini  <address@hidden>
 
+       test defs: fix glitch in TAP version of `warn_' function
+       * tests/tap-functions.sh (warn_): Do not display the warning
+       message two times.
+
+2011-09-07  Stefano Lattarini  <address@hidden>
+
        tests: fix another spurious failure due to ignored signals
        * tests/tap-signal.test: Renamed ...
        * tests/tap-signal.tap: ... to this, converted to the use of the
diff --git a/tests/tap-functions.sh b/tests/tap-functions.sh
index ea88887..eb27ba6 100644
--- a/tests/tap-functions.sh
+++ b/tests/tap-functions.sh
@@ -97,7 +97,10 @@ diag_string_="#"
 # Give a warning (using TAP diagnostic).
 warn_ ()
 {
-  diag_ "WARNING:" ${1-"(unknown warning)"} ${1+"$@"}
+  case $# in
+    0) diag_ "WARNING: (unknown warning)";;
+    *) diag_ "WARNING: $*";;
+  esac
 }
 
 # result_ RESULT [-D DIRECTIVE] [-r REASON] [--] [DESCRIPTION...]
-- 
1.7.2.3