*** empty log message ***

diff --git a/src/ChangeLog b/src/ChangeLog
index 4f6c074..46c14b5 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2007-04-05  Kenichi Handa  <handa@m17n.org>
+
+       * plist.c (mplist_get_func): Fix for backward compatiblity.
+
 2007-04-04  Kenichi Handa  <handa@m17n.org>
 
        * input.c (minput_get_command, minput_config_command): Fix example

diff --git a/src/plist.c b/src/plist.c
index aae8717..8cda7b9 100644 (file)
--- a/src/plist.c
+++ b/src/plist.c
@@ -1263,13 +1263,7 @@ mplist_put_func (MPlist *plist, MSymbol key, M17NFunc func)
 M17NFunc
 mplist_get_func (MPlist *plist, MSymbol key)
 {
-  while (1)
-    {
-      MPLIST_FIND (plist, key);
-      if (MPLIST_TAIL_P (plist) || MPLIST_VAL_FUNC_P (plist))
-       break;
-      plist = MPLIST_NEXT (plist);
-    };
+  MPLIST_FIND (plist, key);
   return (MPLIST_TAIL_P (plist) ? NULL : MPLIST_FUNC (plist));
 }