Index: openacs-4/packages/xowiki/www/oacs-view.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/oacs-view.adp,v
diff -u -N -r1.25 -r1.26
--- openacs-4/packages/xowiki/www/oacs-view.adp	17 Mar 2007 23:13:21 -0000	1.25
+++ openacs-4/packages/xowiki/www/oacs-view.adp	17 Mar 2007 23:34:44 -0000	1.26
@@ -1,4 +1,4 @@
-<!-- Generated by ::xowiki::ADP_Generator on Sun Mar 18 00:04:23 CET 2007 -->
+<!-- Generated by ::xowiki::ADP_Generator on Sun Mar 18 00:18:56 CET 2007 -->
 <master>
   <property name="title">@title;noquote@</property>
   <property name="context">@context;noquote@</property>
Index: openacs-4/packages/xowiki/www/oacs-view2.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/oacs-view2.adp,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/xowiki/www/oacs-view2.adp	17 Mar 2007 23:13:21 -0000	1.4
+++ openacs-4/packages/xowiki/www/oacs-view2.adp	17 Mar 2007 23:34:44 -0000	1.5
@@ -1,4 +1,4 @@
-<!-- Generated by ::xowiki::ADP_Generator on Sun Mar 18 00:04:23 CET 2007 -->
+<!-- Generated by ::xowiki::ADP_Generator on Sun Mar 18 00:18:56 CET 2007 -->
 <master>
   <property name="title">@title;noquote@</property>
   <property name="context">@context;noquote@</property>
Index: openacs-4/packages/xowiki/www/view-default.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/view-default.adp,v
diff -u -N -r1.21 -r1.22
--- openacs-4/packages/xowiki/www/view-default.adp	17 Mar 2007 23:13:21 -0000	1.21
+++ openacs-4/packages/xowiki/www/view-default.adp	17 Mar 2007 23:34:44 -0000	1.22
@@ -1,4 +1,4 @@
-<!-- Generated by ::xowiki::ADP_Generator on Sun Mar 18 00:04:23 CET 2007 -->
+<!-- Generated by ::xowiki::ADP_Generator on Sun Mar 18 00:18:56 CET 2007 -->
 <master>
   <property name="title">@title;noquote@</property>
   <property name="context">@context;noquote@</property>
Index: openacs-4/packages/xowiki/www/view-links.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/view-links.adp,v
diff -u -N -r1.11 -r1.12
--- openacs-4/packages/xowiki/www/view-links.adp	17 Mar 2007 23:13:21 -0000	1.11
+++ openacs-4/packages/xowiki/www/view-links.adp	17 Mar 2007 23:34:44 -0000	1.12
@@ -1,4 +1,4 @@
-<!-- Generated by ::xowiki::ADP_Generator on Sun Mar 18 00:04:23 CET 2007 -->
+<!-- Generated by ::xowiki::ADP_Generator on Sun Mar 18 00:18:56 CET 2007 -->
 <!-- The following DIV is needed for overlib to function! -->
   <div id="overDiv" style="position:absolute; visibility:hidden; z-index:1000;"></div>	
 <div class='xowiki-content'>
Index: openacs-4/packages/xowiki/www/view-plain.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/view-plain.adp,v
diff -u -N -r1.7 -r1.8
--- openacs-4/packages/xowiki/www/view-plain.adp	17 Mar 2007 23:13:21 -0000	1.7
+++ openacs-4/packages/xowiki/www/view-plain.adp	17 Mar 2007 23:34:44 -0000	1.8
@@ -1,4 +1,4 @@
-<!-- Generated by ::xowiki::ADP_Generator on Sun Mar 18 00:04:23 CET 2007 -->
+<!-- Generated by ::xowiki::ADP_Generator on Sun Mar 18 00:18:56 CET 2007 -->
 <!-- The following DIV is needed for overlib to function! -->
   <div id="overDiv" style="position:absolute; visibility:hidden; z-index:1000;"></div>	
 <div class='xowiki-content'>
Index: openacs-4/packages/xowiki/www/prototypes/contributors.page
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/prototypes/contributors.page,v
diff -u -N
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/xowiki/www/prototypes/contributors.page	17 Mar 2007 23:34:44 -0000	1.1
@@ -0,0 +1,32 @@
+# -*- tcl-*-
+# $Id: contributors.page,v 1.1 2007/03/17 23:34:44 gustafn Exp $
+::xowiki::Object new -title "Contributors" -text {
+
+  my proc content {} {
+    my instvar package_id
+    set folder_id [$package_id folder_id]
+
+    TableWidget t1 -volatile \
+        -columns {
+          Field contributor -label "Contributor"
+          Field count -label "Page Revisions"
+        }
+
+    db_foreach get_contributors {select count(object_id), creation_user 
+      from acs_objects o, cr_revisions cr,cr_items ci 
+      where object_id = revision_id 
+        and parent_id = :folder_id
+        and cr.item_id = ci.item_id 
+      group by creation_user order by count desc;
+    } {
+      t1 add \
+          -contributor [::xo::get_user_name $creation_user] \
+          -count $count
+    }
+    return "The following users have contributed to this xowiki instance:<p>[t1 asHTML]</p>"
+  }
+  
+}
+
+
+