From: MORIOKA Tomohiko Date: Mon, 27 Feb 2017 11:04:41 +0000 (+0900) Subject: (isd-turtle-uri-encode-feature-name): Use "a.ucs" instead of `ucs' for X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=5ae38091eee1b60b7e68e2d2346e0ddaaaaa9aee;p=chise%2Fisd.git (isd-turtle-uri-encode-feature-name): Use "a.ucs" instead of `ucs' for `=ucs'. (isd-turtle-encode-char): Likewise. --- diff --git a/isd-turtle.el b/isd-turtle.el index f20c817..d13bea5 100644 --- a/isd-turtle.el +++ b/isd-turtle.el @@ -86,9 +86,9 @@ (defun isd-turtle-uri-encode-feature-name (feature-name) (cond ((eq '=ucs feature-name) - 'ucs) + "a.ucs") ((eq '==>ucs@bucs feature-name) - 'bucs) + "bucs") (t (mapconcat (lambda (c) (if (eq c ?@) @@ -108,7 +108,7 @@ ccs ret) (if (setq ret (encode-char object '=ucs)) (prog1 - (format "ucs:0x%04X" ret) + (format "a.ucs:0x%04X" ret) (unless (memq '=ucs isd-turtle-ccs-list) (setq isd-turtle-ccs-list (cons '=ucs isd-turtle-ccs-list)))) (while (and ccs-list