diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index b47c116d71..2a7b639933 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2001-06-04  Jim Blandy  <jimb@redhat.com>
+
+	* gdb.base/help.exp: Update pattern to exclude `print-load-map'
+	command.
+
 2001-05-31  Kevin Buettner  <kevinb@redhat.com>
 
 	* gdb.base/annota1.exp (info break): Match four or more spaces
diff --git a/gdb/testsuite/gdb.base/help.exp b/gdb/testsuite/gdb.base/help.exp
index e3c94c6b95..a09f8da69a 100644
--- a/gdb/testsuite/gdb.base/help.exp
+++ b/gdb/testsuite/gdb.base/help.exp
@@ -542,7 +542,7 @@ gdb_test "help info bogus-gdb-command" "Undefined info command: \"bogus-gdb-comm
 # test help gotcha
 gdb_test "help gotcha" "Undefined command: \"gotcha\".  Try \"help\"."  "help gotcha"
 # test apropos regex
-gdb_test "apropos \\\(print\[\^ bsiedf\\\".\]\\\)" "handle -- Specify how to handle a signal"
+gdb_test "apropos \\\(print\[\^ bsiedf\\\".-\]\\\)" "handle -- Specify how to handle a signal"
 # test apropos >1 word string
 gdb_test "apropos handle a signal" "handle -- Specify how to handle a signal"
 # test apropos apropos