X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=cwiki-common.el;h=cd0191286026a57010fda71bd44bc5da63615c90;hb=ee2268c392055f33392c57aa7a8631ea76d028e1;hp=e1b28b80e5da0911a6088264a2fbbe4674bf6d9a;hpb=7ad2d1ee0a0faaa2fd7688eeb51f43cdea78bfa0;p=chise%2Fest.git

diff --git a/cwiki-common.el b/cwiki-common.el
index e1b28b8..cd01912 100644
--- a/cwiki-common.el
+++ b/cwiki-common.el
@@ -43,6 +43,18 @@
 
 (mount-char-attribute-table '->HNG)
 (mount-char-attribute-table '<-HNG)
+(mount-char-attribute-table '->HNG@CN/manuscript)
+(mount-char-attribute-table '<-HNG@CN/manuscript)
+(mount-char-attribute-table '->HNG@CN/printed)
+(mount-char-attribute-table '<-HNG@CN/printed)
+(mount-char-attribute-table '->HNG@JP/manuscript)
+(mount-char-attribute-table '<-HNG@JP/manuscript)
+(mount-char-attribute-table '->HNG@JP/printed)
+(mount-char-attribute-table '<-HNG@JP/printed)
+(mount-char-attribute-table '->HNG@KR)
+(mount-char-attribute-table '<-HNG@KR)
+(mount-char-attribute-table '->HNG@MISC)
+(mount-char-attribute-table '<-HNG@MISC)
 
 
 (defvar est-hide-cgi-mode nil)
@@ -1007,6 +1019,27 @@ style=\"vertical-align:middle\">"
 	     t 'literal))
 
 	  (goto-char (point-min))
+	  (while (re-search-forward "&SW-JIGUGE\\([45]?\\)-\\([0-9]+\\);" nil t)
+	    (setq subcode (match-string 1)
+		  code (string-to-int (match-string 2)))
+	    (setq plane
+		  (if (string= subcode "")
+		      "5"
+		    subcode))
+	    (replace-match
+	     (format "<div class=\"tooltip\"><img alt=\"SW-JIGUGE%s-%05d\" src=\"%s/ShuoWen/Jiguge%s/%05d.png\"
+style=\"vertical-align:middle; width: auto; max-height: 80px\"><span
+class=\"tooltiptext\">%s</span></div>"
+		     plane code
+		     chise-wiki-bitmap-glyphs-url
+		     plane code
+		     (charset-description
+		      (if (string= subcode "")
+			  '=shuowen-jiguge
+			(intern (format "===shuowen-jiguge%s" subcode)))))
+	     t 'literal))
+
+	  (goto-char (point-min))
 	  (while (re-search-forward "&HNG\\([0-9]+\\)-\\([0-9][0-9][0-9][0-9]\\)\\([0-9]\\);" nil t)
 	    (setq plane (match-string 1)
 		  code (string-to-int (match-string 2))
@@ -1018,7 +1051,7 @@ style=\"vertical-align:middle\">"
 	    (replace-match
 	     (format
 	      "<div class=\"tooltip\"><img alt=\"HNG%s-%04d%s\" src=\"%s/%s/%04d%s.png\" style=\"
-vertical-align:middle; width: 48px; height: 48px\"><span
+vertical-align:middle; width: auto; max-height: 60px\"><span
 class=\"tooltiptext\">%s</span></div>"
 	      plane code subcode
 	      chise-wiki-hng-bitmap-glyphs-url