- Assign new genres `morpheme-entry@zh-classical',

  `word-class@zh-classical', `morpheme@zh-classical',
  `sentence@zh-classical' and `sentence-entry@zh-classical'.
- Mount char-feature `*instance@morpheme-entry/zh-classical'.

diff --git a/cwiki-common.el b/cwiki-common.el
index 78c3481..cae1b12 100644 (file)
--- a/cwiki-common.el
+++ b/cwiki-common.el
@@ -23,6 +23,14 @@
 (mount-char-attribute-table '*instance@ruimoku/bibliography/title)
 ;; (mount-char-attribute-table '*instance@ruimoku/bibliography/content*note)
 
+(concord-assign-genre 'morpheme-entry@zh-classical "/usr/local/var/kanbun/db")
+(concord-assign-genre 'word-class@zh-classical "/usr/local/var/kanbun/db")
+(concord-assign-genre 'morpheme@zh-classical "/usr/local/var/kanbun/db")
+(concord-assign-genre 'sentence@zh-classical "/usr/local/var/kanbun/db")
+(concord-assign-genre 'sentence-entry@zh-classical "/usr/local/var/kanbun/db")
+
+(mount-char-attribute-table '*instance@morpheme-entry/zh-classical)
+
 
 (defvar chise-wiki-view-url "view.cgi")
 (defvar chise-wiki-edit-url "edit.cgi")