Use binary instead of no-conversion.

[elisp/tamago.git] / its.el

diff --git a/its.el b/its.el
index 25728ea..e2528c1 100644 (file)
--- a/its.el
+++ b/its.el
@@ -130,7 +130,7 @@
 ;; <key-state-table> ::= ( <key-state-alist> . <expr-output-back-list> )
 ;; <key-state-alist> ::= ( <key-state> ... )
 ;; <key-state> ::= ( <key> . <state> )
-;; <key> ::= Positive INTEGER which specifies KEY STROKE
+;; <key> ::= CHARACTER which specifies KEY STROKE
 ;;        |  -1 ; means END of key stroke
 ;;
 ;; Only applicable for last transition.
@@ -213,7 +213,7 @@
           l)
          ((numberp l)                  ; VSYL
           (car syl))
-         ((numberp (cdr l))
+         ((egg-characterp (cdr l))
           (substring (car l) 0 (cdr l)))
          (t
           (car l)))))
@@ -314,6 +314,7 @@
     (let ((p (point))
          (str (copy-sequence "!")))
       (set-text-properties 0 1 (list 'read-only          t
+                                    'start-open         t
                                     'invisible          t
                                     'intangible         'its-part-2
                                     'its-cursor         cursor