Oops - my earlier 'optimization' caused a regression.

* tests/local.at (AT_CHECK_M4): Fix typo.

Signed-off-by: Eric Blake <ebb9@byu.net>

diff --git a/ChangeLog b/ChangeLog
index 63278cf31ec1aa66bec76cc2a9f6d33777c5e561..48c6c20a7031bb179f1c55cbb8dc2c7c69034241 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-09-28  Eric Blake  <ebb9@byu.net>
+
+       Oops - my earlier 'optimization' caused a regression.
+       * tests/local.at (AT_CHECK_M4): Fix typo.
+
 2007-09-27  Eric Blake  <ebb9@byu.net>
        and Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 

diff --git a/tests/local.at b/tests/local.at
index 8a6bffde63a6dabfd73b241dacff5c24b95725a5..43ae4a928de18f28111af14b37c15a01960e9ec6 100644 (file)
--- a/tests/local.at
+++ b/tests/local.at
@@ -96,8 +96,9 @@ m4_define([AT_CHECK_PERL_SYNTAX],
 # remove the error code during normalization.
 #
 m4_define([AT_CHECK_M4],
-[AT_CHECK([$1], [$2], [$3], m4_if([$4], [], [], [ignore], [ignore], [stderr]))
-m4_if([$4], [], [], [ignore], [],
+[AT_CHECK([$1], [$2], [$3],
+          m4_case([$4], [], [], [ignore], [ignore], [stderr]))
+m4_case([$4], [], [], [ignore], [],
 [AT_CHECK([[sed 's/^[^:]*m4: *\([^:]*:\) *\([0-9][0-9]*: \)/m4:\1\2/
        s/^\([^:]*:\) *\([0-9][0-9]*:\)[^:]*m4: /m4:\1\2 /
        s/^\(m4:[^:]*:[0-9][0-9]*: \)C\(annot open \)\([^`:]*\):/\1c\2`\3'\'':/