* subr.el (map-keymap-sorted): Rename from map-keymap-internal.

Remove `sort-first' argument.
* keymap.c (Fmap_keymap): Use `map-keymap-sorted.

2 files changed, 3 insertions, 1 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 6ebc93e66d8..15cbb094d6a 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,7 @@
 2008-03-25  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+        * keymap.c (Fmap_keymap): Use `map-keymap-sorted.
+
         * frame.c (Fmodify_frame_parameters, x_set_frame_parameters):
         Use XCAR/XCDR.
 
diff --git a/src/keymap.c b/src/keymap.c
index e91df88aaff..310b46b23bf 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -735,7 +735,7 @@ usage: (map-keymap FUNCTION KEYMAP)  */)
        significance.  */
     xsignal1 (Qinvalid_function, function);
   if (! NILP (sort_first))
-    return call3 (intern ("map-keymap-internal"), function, keymap, Qt);
+    return call2 (intern ("map-keymap-sorted"), function, keymap);
 
   map_keymap (keymap, map_keymap_call, function, NULL, 1);
   return Qnil;