[uim-commit] r126 - trunk/scm

[yamaken@freedesktop.org]

Author: yamaken
Date: 2005-01-05 03:37:32 -0800 (Wed, 05 Jan 2005)
New Revision: 126

Modified:
   trunk/scm/m17nlib.scm
Log:
* scm/m17nlib.scm
  - (m17nlib-on-key?, m17nlib-off-key?): Add quote to
    generic-{on,off}-key? to allow reflect runtime redefinition of
    generic-{on,off}-key?. See rule 8 of doc/KEY to recognize what
    quote means (what is different between closure and symbol for arg
    of define-key)


Modified: trunk/scm/m17nlib.scm
===================================================================
--- trunk/scm/m17nlib.scm	2005-01-05 09:47:20 UTC (rev 125)
+++ trunk/scm/m17nlib.scm	2005-01-05 11:37:32 UTC (rev 126)
@@ -35,8 +35,8 @@
 (define m17nlib-candidate-max 10)
 
 ;; key defs
-(define-key m17nlib-on-key? generic-on-key?)
-(define-key m17nlib-off-key? generic-off-key?)
+(define-key m17nlib-on-key? 'generic-on-key?)
+(define-key m17nlib-off-key? 'generic-off-key?)
 
 ;; widgets and actions