X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fest.git;a=blobdiff_plain;f=cwiki-view.el;h=3ce51b53887dbea8374425ac739e030178c9bbe9;hp=b0c1454550785e157dbefe2f113ccb92e8ce4da8;hb=94afae05add89b808ec4054afd69409c5fc7c3f6;hpb=7cf6374f08c1ced6f96a76e18b1ba51011d20caf diff --git a/cwiki-view.el b/cwiki-view.el index b0c1454..3ce51b5 100644 --- a/cwiki-view.el +++ b/cwiki-view.el @@ -224,6 +224,19 @@ li { margin: 0 0 0 2em; } (format "\"%s\"" ret ret))) ) + ((and (eq genre 'hng-card) + (setq ret (concord-object-get object '=hng-card)) + (setq ret (symbol-name ret)) + (string-match "\\([0-9]+\\)-\\([0-9]+\\)" ret)) + (princ + (format + "\"HNG-card:%s\"" + ret + (string-to-int (match-string 1 ret)) + (string-to-int (match-string 2 ret)))) + ) (t (setq ret (www-format-encode-string (est-format-object object 'readable)))