Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v
diff -u -r1.277 -r1.278
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	12 Sep 2008 17:28:42 -0000	1.277
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	12 Sep 2008 19:19:56 -0000	1.278
@@ -1674,11 +1674,11 @@
     }
     next
   }
-  #   PageInstance instproc count_usages {{-all false}} {
-  #     # TODO: if we continue this approach, this method should go into Page
-  #     return [::xowiki::PageTemplate count_usages -item_id [my item_id] -all $all]
-  #   }
 
+  PageInstance instproc count_usages {{-publish_status ready}} {
+    return [::xowiki::PageTemplate count_usages -item_id [my item_id] -publish_status $publish_status]
+  }
+
   #
   # Methods of ::xowiki::Object
   #