# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1198580271 0
# Node ID 514550f2a5ff0f161eb56a77718588f18d9fb902
# Parent  ac0200dcbfddecfd6aaf71ed000cf2a8b712f937
(diacritic-composition-function): Fix arguments.

diff -r ac0200dcbfdd -r 514550f2a5ff lisp/language/european.el
--- a/lisp/language/european.el	Tue Dec 25 10:53:18 2007 +0000
+++ b/lisp/language/european.el	Tue Dec 25 10:57:51 2007 +0000
@@ -708,7 +708,7 @@
   (interactive)
   (diacritic-compose-region (point-min) (point-max)))
 
-(defun diacritic-composition-function (pos &optional string)
+(defun diacritic-composition-function (pos to font-object string)
   "Compose diacritic text around POS.
 Optional 2nd argument STRING, if non-nil, is a string containing text
 to compose.