[uim-commit] r1785 - branches/r5rs/uim

[yamaken at freedesktop.org]

Author: yamaken
Date: 2005-10-03 15:34:53 -0700 (Mon, 03 Oct 2005)
New Revision: 1785

Modified:
   branches/r5rs/uim/uim-scm.c
Log:
* uim/uim-scm.c
  - (uim_scm_init): Enable SIOD-compatible features by default


Modified: branches/r5rs/uim/uim-scm.c
===================================================================
--- branches/r5rs/uim/uim-scm.c	2005-10-03 22:33:22 UTC (rev 1784)
+++ branches/r5rs/uim/uim-scm.c	2005-10-03 22:34:53 UTC (rev 1785)
@@ -655,6 +655,7 @@
 
 
   SigScm_Initialize();
+  ScmExp_use(Scm_Intern("siod"), SCM_INTERACTION_ENV);
   true_sym  = (uim_lisp)SCM_TRUE;
   false_sym = (uim_lisp)SCM_FALSE;
   protected_arg0 = uim_scm_f();