Mount `sound@fanqie'.

(www-feature-value-format): Use `space-separated-source-list' for
`domain-list'.
(est-format-object): Accept feature `=title' as the same as `title'.

diff --git a/cwiki-common.el b/cwiki-common.el
index aad28dd..4b99b41 100644 (file)
--- a/cwiki-common.el
+++ b/cwiki-common.el
@@ -80,6 +80,8 @@
 (mount-char-attribute-table '<-HDIC-SYP@KTB)
 (mount-char-attribute-table '->HDIC-SYP@KTB)
 
+(mount-char-attribute-table 'sound@fanqie)
+
 (defvar est-hide-cgi-mode nil)
 (defvar est-view-url-prefix "..")
 (defvar chise-wiki-view-url "view.cgi")
@@ -357,6 +359,8 @@
               'space-separated)
              ((eq type 'structure)
               'space-separated-ids)
+             ((eq type 'domain-list)
+              'space-separated-source-list)
              ((eq type 'stext)
               'wiki-text)
              ))
@@ -817,7 +821,8 @@
     (let ((ret (or (if readable
                       (or (concord-object-get object 'name)
                           (concord-object-get object '=name)
-                          (concord-object-get object 'title)))
+                          (concord-object-get object 'title)
+                          (concord-object-get object '=title)))
                   (concord-object-id object))))
       (format "%s" ret))))