diff --git a/src/ChangeLog b/src/ChangeLog
index b95ac6cf34f..da49011d176 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,9 @@
+2008-09-28  Martin Rudalics  <rudalics@gmx.at>
+
+	* character.c (Fchar_resolve_modifiers): Rewrite Elisp function
+	name as char-resolve-modifiers.
+	Reported by: Markus Triska <markus.triska@gmx.at>
+
 2008-09-28  Dan Nicolaescu  <dann@ics.uci.edu>
 
 	* dispnew.c (init_display): Return earlier when running as a
diff --git a/src/character.c b/src/character.c
index 7c0f38f96a5..ed1913e471a 100644
--- a/src/character.c
+++ b/src/character.c
@@ -1011,12 +1011,12 @@ usage: (unibyte-string &rest BYTES)  */)
   return make_string_from_bytes ((char *) buf, n, p - buf);
 }
 
-DEFUN ("char-resolve-modifers", Fchar_resolve_modifiers,
+DEFUN ("char-resolve-modifiers", Fchar_resolve_modifiers,
        Schar_resolve_modifiers, 1, 1, 0,
        doc: /* Resolve modifiers in the character CHAR.
 The value is a character with modifiers resolved into the character
 code.  Unresolved modifiers are kept in the value.
-usage: (char-resolve-modifers CHAR)  */)
+usage: (char-resolve-modifiers CHAR)  */)
      (character)
      Lisp_Object character;
 {