From: MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
Date: Sun, 4 Apr 2010 23:51:59 +0000 (+0900)
Subject: (chise-wiki-view-url): Use "view.cgi" instead of "../view.cgi".
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=82b8b144d9be88f23f6670696e684205e2d26b89;p=chise%2Fest.git

(chise-wiki-view-url): Use "view.cgi" instead of "../view.cgi".
---

diff --git a/cwiki-edit.el b/cwiki-edit.el
index 9bcda3b..5341169 100644
--- a/cwiki-edit.el
+++ b/cwiki-edit.el
@@ -1,32 +1,9 @@
 ;; -*- 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)))