;; -*- coding: utf-8-mcs-er -*-
-(defvar chise-wiki-view-url "../view.cgi")
+(defvar chise-wiki-view-url "view.cgi")
(defvar chise-wiki-edit-url "edit.cgi")
(require 'cwiki-common)
-;; (defun www-edit-display-char-feature-default (char feature-name &optional value
-;; lang)
-;; (unless value
-;; (setq value (www-char-feature char feature-name)))
-;; (www-html-display-paragraph
-;; (format "[[%s|%s?feature=%s]] : %s [[[edit|edit.cgi?char=%s&feature=%s]]]"
-;; (www-format-feature-name feature-name lang)
-;; chise-wiki-view-url
-;; (www-uri-encode-feature-name feature-name)
-;; (www-format-value char feature-name value nil 'without-tags)
-;; (char-to-string char)
-;; (www-uri-encode-feature-name feature-name)
-;; )))
-
-;; (defun www-edit-display-char-feature-as-ucs (char feature-name &optional value)
-;; (unless value
-;; (setq value (www-char-feature char feature-name)))
-;; (www-html-display-paragraph
-;; (format "= [[U+%s|http://www.unicode.org/cgi-bin/GetUnihanData.pl?codepoint=%s]] (%d)"
-;; (www-format-value-as-HEX value)
-;; (www-format-value-as-HEX value)
-;; value)))
-
(defun www-edit-display-input-box (object name value &optional format)
(when (stringp format)
(setq format (intern format)))