[Initial rendering protool for `query-view'
clinton@unknownlamer.org**20090305062458
 Ignore-this: ee4e044878cc1745f06697f64eedd3d2
] {
hunk ./src/packages.lisp 36
+
+   :render-query-view-result
hunk ./src/query-view.lisp 191
+;; default rendering protocol
+(defgeneric render-query-view-result (result query-view))
+
+(defmethod render ((query-view query-view))
+  (mapc (arnesi:rcurry #'render-query-view-result query-view)
+	(current-items query-view)))
+
}