X-Git-Url: https://git.hcoop.net/clinton/lisp-on-lines.git/blobdiff_plain/31597d71ef8141a1134d75668cfa9ce4f6ecae06..6fc8733b376ef21d53863abcd6b5647e37da8041:/src/mewa/presentations.lisp

diff --git a/src/mewa/presentations.lisp b/src/mewa/presentations.lisp
index 837e9a8..0ec34ee 100644
--- a/src/mewa/presentations.lisp
+++ b/src/mewa/presentations.lisp
@@ -62,8 +62,7 @@
 		      :value (select-label listing)))))
     (dolist (slot (slots listing))
       (<:td :class "data-cell" (present-slot slot object)))
-    (<:td :class "index-number-cell"
-      (<:i (<:as-html index)))
+    (<:td :class "index-number-cell")
     ))
 
 (defmethod get-all-instances ((self mewa-list-presentation))