X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Futf-2000%2Fu0FE20-Combining-Half-Marks.el;fp=lisp%2Futf-2000%2Fu0FE20-Combining-Half-Marks.el;h=137f1cfd3ca72ba3f0c73e4ba24e91a5bf63103b;hp=0000000000000000000000000000000000000000;hb=a5812bf2ff9a9cf40f4ff78dcb83f5b4c295bd18;hpb=ccce6217f84987dff10ed3d2b60b9f0f65d8f25a

diff --git a/lisp/utf-2000/u0FE20-Combining-Half-Marks.el b/lisp/utf-2000/u0FE20-Combining-Half-Marks.el
new file mode 100644
index 0000000..137f1cf
--- /dev/null
+++ b/lisp/utf-2000/u0FE20-Combining-Half-Marks.el
@@ -0,0 +1,28 @@
+(define-char
+  '((name		. "COMBINING LIGATURE LEFT HALF")
+    (general-category	mark non-spacing) ; Normative Category
+    (bidi-category	. "NSM")
+    (mirrored		. nil)
+    (=ucs		. #xFE20)	; ︠
+    ))
+(define-char
+  '((name		. "COMBINING LIGATURE RIGHT HALF")
+    (general-category	mark non-spacing) ; Normative Category
+    (bidi-category	. "NSM")
+    (mirrored		. nil)
+    (=ucs		. #xFE21)	; ︡
+    ))
+(define-char
+  '((name		. "COMBINING DOUBLE TILDE LEFT HALF")
+    (general-category	mark non-spacing) ; Normative Category
+    (bidi-category	. "NSM")
+    (mirrored		. nil)
+    (=ucs		. #xFE22)	; ︢
+    ))
+(define-char
+  '((name		. "COMBINING DOUBLE TILDE RIGHT HALF")
+    (general-category	mark non-spacing) ; Normative Category
+    (bidi-category	. "NSM")
+    (mirrored		. nil)
+    (=ucs		. #xFE23)	; ︣
+    ))