Author: yamaken
Date: Wed Mar 2 06:51:44 2005
New Revision: 742
Modified:
branches/composer/scm/ng-japanese.scm
Log:
* scm/ng-japanese.scm
- (ja-halfwidth-basic-symbol-ruleset,
ja-fullwidth-basic-symbol-ruleset, ja-halfwidth-alphabet-ruleset,
ja-fullwidth-alphabet-ruleset): Add mod_ignore_Shift to allow
shift-modified key events
Modified: branches/composer/scm/ng-japanese.scm
==============================================================================
--- branches/composer/scm/ng-japanese.scm (original)
+++ branches/composer/scm/ng-japanese.scm Wed Mar 2 06:51:44 2005
@@ -222,75 +222,75 @@
(define ja-halfwidth-basic-symbol-ruleset
'(
;;((" ") (" "))
- (("!") ("!"))
- (("\"") ("\""))
- (("#") ("#"))
- (("$") ("$"))
- (("%") ("%"))
- (("&") ("&"))
- (("'") ("'"))
- (("(") ("("))
- ((")") (")"))
- (("*") ("*"))
- (("+") ("+"))
- ;;((",") (","))
- ;;(("-") ("-"))
- ;;((".") ("."))
- (("/") ("/"))
- ((":") (":"))
- ((";") (";"))
- (("<") ("<"))
- (("=") ("="))
- ((">") (">"))
- (("?") ("?"))
- (("@") ("@"))
- (("[") ("["))
- (("\\") ("\\"))
- (("]") ("]"))
- (("^") ("^"))
- (("_") ("_"))
- (("`") ("`"))
- (("{") ("{"))
- (("|") ("|"))
- (("}") ("}"))
- (("~") ("~"))
+ ((("!" mod_ignore_Shift)) ("!"))
+ ((("\"" mod_ignore_Shift)) ("\""))
+ ((("#" mod_ignore_Shift)) ("#"))
+ ((("$" mod_ignore_Shift)) ("$"))
+ ((("%" mod_ignore_Shift)) ("%"))
+ ((("&" mod_ignore_Shift)) ("&"))
+ ((("'" mod_ignore_Shift)) ("'"))
+ ((("(" mod_ignore_Shift)) ("("))
+ (((")" mod_ignore_Shift)) (")"))
+ ((("*" mod_ignore_Shift)) ("*"))
+ ((("+" mod_ignore_Shift)) ("+"))
+ ;;((("," mod_ignore_Shift)) (","))
+ ;;((("-" mod_ignore_Shift)) ("-"))
+ ;;((("." mod_ignore_Shift)) ("."))
+ ((("/" mod_ignore_Shift)) ("/"))
+ (((":" mod_ignore_Shift)) (":"))
+ (((";" mod_ignore_Shift)) (";"))
+ ((("<" mod_ignore_Shift)) ("<"))
+ ((("=" mod_ignore_Shift)) ("="))
+ (((">" mod_ignore_Shift)) (">"))
+ ((("?" mod_ignore_Shift)) ("?"))
+ ((("@" mod_ignore_Shift)) ("@"))
+ ((("[" mod_ignore_Shift)) ("["))
+ ((("\\" mod_ignore_Shift)) ("\\"))
+ ((("]" mod_ignore_Shift)) ("]"))
+ ((("^" mod_ignore_Shift)) ("^"))
+ ((("_" mod_ignore_Shift)) ("_"))
+ ((("`" mod_ignore_Shift)) ("`"))
+ ((("{" mod_ignore_Shift)) ("{"))
+ ((("|" mod_ignore_Shift)) ("|"))
+ ((("}" mod_ignore_Shift)) ("}"))
+ ((("~" mod_ignore_Shift)) ("~"))
))
(define ja-fullwidth-basic-symbol-ruleset
'(
;;((" ") ("��"))
- (("!") ("��"))
- (("\"") ("��"))
- (("#") ("��"))
- (("$") ("��"))
- (("%") ("��"))
- (("&") ("��"))
- (("'") ("��"))
- (("(") ("��"))
- ((")") ("��"))
- (("*") ("��"))
- (("+") ("��"))
- ;;((",") ("��"))
- ;;(("-") ("��"))
- ;;((".") ("��"))
- (("/") ("��"))
- ((":") ("��"))
- ((";") ("��"))
- (("<") ("��"))
- (("=") ("��"))
- ((">") ("��"))
- (("?") ("��"))
- (("@") ("��"))
- (("[") ("��"))
- (("\\") ("��"))
- (("]") ("��"))
- (("^") ("��"))
- (("_") ("��"))
- (("`") ("��"))
- (("{") ("��"))
- (("|") ("��"))
- (("}") ("��"))
- (("~") ("��"))
+ ((("!" mod_ignore_Shift)) ("��"))
+ ((("\"" mod_ignore_Shift)) ("��"))
+ ((("#" mod_ignore_Shift)) ("��"))
+ ((("$" mod_ignore_Shift)) ("��"))
+ ((("%" mod_ignore_Shift)) ("��"))
+ ((("&" mod_ignore_Shift)) ("��"))
+ ((("'" mod_ignore_Shift)) ("��"))
+ ((("(" mod_ignore_Shift)) ("��"))
+ (((")" mod_ignore_Shift)) ("��"))
+ ((("*" mod_ignore_Shift)) ("��"))
+ ((("+" mod_ignore_Shift)) ("��"))
+ ;;((("," mod_ignore_Shift)) ("��"))
+ ;;((("-" mod_ignore_Shift)) ("��"))
+ ;;((("." mod_ignore_Shift)) ("��"))
+ ((("/" mod_ignore_Shift)) ("��"))
+ (((":" mod_ignore_Shift)) ("��"))
+ (((";" mod_ignore_Shift)) ("��"))
+ ((("<" mod_ignore_Shift)) ("��"))
+ ((("=" mod_ignore_Shift)) ("��"))
+ (((">" mod_ignore_Shift)) ("��"))
+ ((("?" mod_ignore_Shift)) ("��"))
+ ((("@" mod_ignore_Shift)) ("��"))
+ ((("[" mod_ignore_Shift)) ("��"))
+ ((("\\" mod_ignore_Shift)) ("��"))
+ ((("]" mod_ignore_Shift)) ("��"))
+ ((("^" mod_ignore_Shift)) ("��"))
+ ((("_" mod_ignore_Shift)) ("��"))
+ ((("`" mod_ignore_Shift)) ("��"))
+ ((("{" mod_ignore_Shift)) ("��"))
+ ((("|" mod_ignore_Shift)) ("��"))
+ ((("}" mod_ignore_Shift)) ("��"))
+ ((("~" mod_ignore_Shift)) ("��"))
))
;; numbers
@@ -320,114 +320,114 @@
;; alphabets
(define ja-halfwidth-alphabet-ruleset
- '((("a") ("a"))
- (("b") ("b"))
- (("c") ("c"))
- (("d") ("d"))
- (("e") ("e"))
- (("f") ("f"))
- (("g") ("g"))
- (("h") ("h"))
- (("i") ("i"))
- (("j") ("j"))
- (("k") ("k"))
- (("l") ("l"))
- (("m") ("m"))
- (("n") ("n"))
- (("o") ("o"))
- (("p") ("p"))
- (("q") ("q"))
- (("r") ("r"))
- (("s") ("s"))
- (("t") ("t"))
- (("u") ("u"))
- (("v") ("v"))
- (("w") ("w"))
- (("x") ("x"))
- (("y") ("y"))
- (("z") ("z"))
-
- (("A") ("A"))
- (("B") ("B"))
- (("C") ("C"))
- (("D") ("D"))
- (("E") ("E"))
- (("F") ("F"))
- (("G") ("G"))
- (("H") ("H"))
- (("I") ("I"))
- (("J") ("J"))
- (("K") ("K"))
- (("L") ("L"))
- (("M") ("M"))
- (("N") ("N"))
- (("O") ("O"))
- (("P") ("P"))
- (("Q") ("Q"))
- (("R") ("R"))
- (("S") ("S"))
- (("T") ("T"))
- (("U") ("U"))
- (("V") ("V"))
- (("W") ("W"))
- (("X") ("X"))
- (("Y") ("Y"))
- (("Z") ("Z"))))
+ '(((("a" mod_ignore_Shift)) ("a"))
+ ((("b" mod_ignore_Shift)) ("b"))
+ ((("c" mod_ignore_Shift)) ("c"))
+ ((("d" mod_ignore_Shift)) ("d"))
+ ((("e" mod_ignore_Shift)) ("e"))
+ ((("f" mod_ignore_Shift)) ("f"))
+ ((("g" mod_ignore_Shift)) ("g"))
+ ((("h" mod_ignore_Shift)) ("h"))
+ ((("i" mod_ignore_Shift)) ("i"))
+ ((("j" mod_ignore_Shift)) ("j"))
+ ((("k" mod_ignore_Shift)) ("k"))
+ ((("l" mod_ignore_Shift)) ("l"))
+ ((("m" mod_ignore_Shift)) ("m"))
+ ((("n" mod_ignore_Shift)) ("n"))
+ ((("o" mod_ignore_Shift)) ("o"))
+ ((("p" mod_ignore_Shift)) ("p"))
+ ((("q" mod_ignore_Shift)) ("q"))
+ ((("r" mod_ignore_Shift)) ("r"))
+ ((("s" mod_ignore_Shift)) ("s"))
+ ((("t" mod_ignore_Shift)) ("t"))
+ ((("u" mod_ignore_Shift)) ("u"))
+ ((("v" mod_ignore_Shift)) ("v"))
+ ((("w" mod_ignore_Shift)) ("w"))
+ ((("x" mod_ignore_Shift)) ("x"))
+ ((("y" mod_ignore_Shift)) ("y"))
+ ((("z" mod_ignore_Shift)) ("z"))
+
+ ((("A" mod_ignore_Shift)) ("A"))
+ ((("B" mod_ignore_Shift)) ("B"))
+ ((("C" mod_ignore_Shift)) ("C"))
+ ((("D" mod_ignore_Shift)) ("D"))
+ ((("E" mod_ignore_Shift)) ("E"))
+ ((("F" mod_ignore_Shift)) ("F"))
+ ((("G" mod_ignore_Shift)) ("G"))
+ ((("H" mod_ignore_Shift)) ("H"))
+ ((("I" mod_ignore_Shift)) ("I"))
+ ((("J" mod_ignore_Shift)) ("J"))
+ ((("K" mod_ignore_Shift)) ("K"))
+ ((("L" mod_ignore_Shift)) ("L"))
+ ((("M" mod_ignore_Shift)) ("M"))
+ ((("N" mod_ignore_Shift)) ("N"))
+ ((("O" mod_ignore_Shift)) ("O"))
+ ((("P" mod_ignore_Shift)) ("P"))
+ ((("Q" mod_ignore_Shift)) ("Q"))
+ ((("R" mod_ignore_Shift)) ("R"))
+ ((("S" mod_ignore_Shift)) ("S"))
+ ((("T" mod_ignore_Shift)) ("T"))
+ ((("U" mod_ignore_Shift)) ("U"))
+ ((("V" mod_ignore_Shift)) ("V"))
+ ((("W" mod_ignore_Shift)) ("W"))
+ ((("X" mod_ignore_Shift)) ("X"))
+ ((("Y" mod_ignore_Shift)) ("Y"))
+ ((("Z" mod_ignore_Shift)) ("Z"))))
(define ja-fullwidth-alphabet-ruleset
- '((("a") ("��"))
- (("b") ("��"))
- (("c") ("��"))
- (("d") ("��"))
- (("e") ("��"))
- (("f") ("��"))
- (("g") ("��"))
- (("h") ("��"))
- (("i") ("��"))
- (("j") ("��"))
- (("k") ("��"))
- (("l") ("��"))
- (("m") ("��"))
- (("n") ("��"))
- (("o") ("��"))
- (("p") ("��"))
- (("q") ("��"))
- (("r") ("��"))
- (("s") ("��"))
- (("t") ("��"))
- (("u") ("��"))
- (("v") ("��"))
- (("w") ("��"))
- (("x") ("��"))
- (("y") ("��"))
- (("z") ("��"))
-
- (("A") ("��"))
- (("B") ("��"))
- (("C") ("��"))
- (("D") ("��"))
- (("E") ("��"))
- (("F") ("��"))
- (("G") ("��"))
- (("H") ("��"))
- (("I") ("��"))
- (("J") ("��"))
- (("K") ("��"))
- (("L") ("��"))
- (("M") ("��"))
- (("N") ("��"))
- (("O") ("��"))
- (("P") ("��"))
- (("Q") ("��"))
- (("R") ("��"))
- (("S") ("��"))
- (("T") ("��"))
- (("U") ("��"))
- (("V") ("��"))
- (("W") ("��"))
- (("X") ("��"))
- (("Y") ("��"))
- (("Z") ("��"))))
+ '(((("a" mod_ignore_Shift)) ("��"))
+ ((("b" mod_ignore_Shift)) ("��"))
+ ((("c" mod_ignore_Shift)) ("��"))
+ ((("d" mod_ignore_Shift)) ("��"))
+ ((("e" mod_ignore_Shift)) ("��"))
+ ((("f" mod_ignore_Shift)) ("��"))
+ ((("g" mod_ignore_Shift)) ("��"))
+ ((("h" mod_ignore_Shift)) ("��"))
+ ((("i" mod_ignore_Shift)) ("��"))
+ ((("j" mod_ignore_Shift)) ("��"))
+ ((("k" mod_ignore_Shift)) ("��"))
+ ((("l" mod_ignore_Shift)) ("��"))
+ ((("m" mod_ignore_Shift)) ("��"))
+ ((("n" mod_ignore_Shift)) ("��"))
+ ((("o" mod_ignore_Shift)) ("��"))
+ ((("p" mod_ignore_Shift)) ("��"))
+ ((("q" mod_ignore_Shift)) ("��"))
+ ((("r" mod_ignore_Shift)) ("��"))
+ ((("s" mod_ignore_Shift)) ("��"))
+ ((("t" mod_ignore_Shift)) ("��"))
+ ((("u" mod_ignore_Shift)) ("��"))
+ ((("v" mod_ignore_Shift)) ("��"))
+ ((("w" mod_ignore_Shift)) ("��"))
+ ((("x" mod_ignore_Shift)) ("��"))
+ ((("y" mod_ignore_Shift)) ("��"))
+ ((("z" mod_ignore_Shift)) ("��"))
+
+ ((("A" mod_ignore_Shift)) ("��"))
+ ((("B" mod_ignore_Shift)) ("��"))
+ ((("C" mod_ignore_Shift)) ("��"))
+ ((("D" mod_ignore_Shift)) ("��"))
+ ((("E" mod_ignore_Shift)) ("��"))
+ ((("F" mod_ignore_Shift)) ("��"))
+ ((("G" mod_ignore_Shift)) ("��"))
+ ((("H" mod_ignore_Shift)) ("��"))
+ ((("I" mod_ignore_Shift)) ("��"))
+ ((("J" mod_ignore_Shift)) ("��"))
+ ((("K" mod_ignore_Shift)) ("��"))
+ ((("L" mod_ignore_Shift)) ("��"))
+ ((("M" mod_ignore_Shift)) ("��"))
+ ((("N" mod_ignore_Shift)) ("��"))
+ ((("O" mod_ignore_Shift)) ("��"))
+ ((("P" mod_ignore_Shift)) ("��"))
+ ((("Q" mod_ignore_Shift)) ("��"))
+ ((("R" mod_ignore_Shift)) ("��"))
+ ((("S" mod_ignore_Shift)) ("��"))
+ ((("T" mod_ignore_Shift)) ("��"))
+ ((("U" mod_ignore_Shift)) ("��"))
+ ((("V" mod_ignore_Shift)) ("��"))
+ ((("W" mod_ignore_Shift)) ("��"))
+ ((("X" mod_ignore_Shift)) ("��"))
+ ((("Y" mod_ignore_Shift)) ("��"))
+ ((("Z" mod_ignore_Shift)) ("��"))))
(define ja-direct-ruleset '())
