diff --git a/ChangeLog b/ChangeLog
index aa3f71e7..d5e2a236 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2005-05-27  Paul Eggert  <eggert@cs.ucla.edu>
+
+	* lib/m4sugar/m4sh.m4 (_AS_SHELL_FN_WORK): Fix diagnostics.
+	From Ralf Menzel (trivial change).
+
 2005-05-25  Paul Eggert  <eggert@cs.ucla.edu>
 
 	* tests/local.at: Don't attempt to check for negated character
diff --git a/lib/m4sugar/m4sh.m4 b/lib/m4sugar/m4sh.m4
index ccd295a6..e477394f 100644
--- a/lib/m4sugar/m4sh.m4
+++ b/lib/m4sugar/m4sh.m4
@@ -285,10 +285,10 @@ as_func_ret_failure () {
 exitcode=0
 AS_IF([as_func_success], [],
   [exitcode=1
-  echo as_func_failure succeeded.])
+  echo as_func_success failed.])
 AS_IF([as_func_failure],
   [exitcode=1
-  echo as_func_success failed.])
+  echo as_func_failure succeeded.])
 AS_IF([as_func_ret_success], [],
   [exitcode=1
   echo as_func_ret_success failed.])