Merge egg-980316.

[elisp/egg.git] / its / ascii.el

diff --git a/its/ascii.el b/its/ascii.el
index 3595d17..272a340 100644 (file)
--- a/its/ascii.el
+++ b/its/ascii.el
@@ -35,7 +35,7 @@
   (require 'its))
 
 (define-its-state-machine its-up-map
-  "upcase" "aA" nil
+  "upcase" "aA" nil nil
   "Map for upcase input."
 
   (let ((i ? ))
@@ -44,7 +44,7 @@
       (setq i (1+ i)))))
 
 (define-its-state-machine its-down-map
-  "downcase" "aa" nil
+  "downcase" "aa" nil nil
   "Map for downcase input."
 
   (let ((i ? ))