Author: yamaken
Date: Mon Mar 7 01:42:48 2005
New Revision: 762
Modified:
branches/composer/scm/anthy-custom.scm
branches/composer/scm/anthy.scm
Log:
* scm/anthy-custom.scm
- (custom anthy-commit-transposed-preedit-immediately?): New custom
variable
* scm/anthy.scm
- (anthy-input-state-with-preedit-action): Make transpose operation
configurable as immediate commit or transposition only in
accordance with the custom variable
Modified: branches/composer/scm/anthy-custom.scm
==============================================================================
--- branches/composer/scm/anthy-custom.scm (original)
+++ branches/composer/scm/anthy-custom.scm Mon Mar 7 01:42:48 2005
@@ -40,6 +40,12 @@
(ugettext anthy-im-short-desc))
+(define-custom 'anthy-commit-transposed-preedit-immediately? #f
+ '(anthy)
+ '(boolean)
+ (_ "Immediately commit after preedit transposition (character set
conversion)")
+ (_ "long description will be here."))
+
;;
;; segment separator
;;
Modified: branches/composer/scm/anthy.scm
==============================================================================
--- branches/composer/scm/anthy.scm (original)
+++ branches/composer/scm/anthy.scm Mon Mar 7 01:42:48 2005
@@ -1046,7 +1046,7 @@
(lambda (ac act-id)
(let ((preconv-ustr (anthy-context-preconv-ustr ac))
(kana (anthy-context-kana-mode ac))
- (transpose (if #t
+ (transpose (if anthy-commit-transposed-preedit-immediately?
anthy-commit-transposed-preconv!
anthy-transpose-preconv!))) ;; does not commit
(case act-id
