Index: openacs-4/packages/dotfolio/tcl/dotfolio-security-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotfolio/tcl/dotfolio-security-procs-postgresql.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/dotfolio/tcl/dotfolio-security-procs-postgresql.xql	5 Jun 2005 12:28:37 -0000	1.2
+++ openacs-4/packages/dotfolio/tcl/dotfolio-security-procs-postgresql.xql	5 May 2007 17:22:59 -0000	1.3
@@ -13,6 +13,15 @@
     </querytext>
   </fullquery>
 
+
+  <fullquery name="dotfolio::dotfolio_p.dotfolio_count">
+    <querytext>
+	SELECT 1
+          FROM dotfolios
+          WHERE owner_id = :user_id
+    </querytext>
+  </fullquery>
+
   <fullquery name="dotfolio::get_user_types_as_options.select_user_types_as_options_without_guest">
     <querytext>
       SELECT pretty_name, type
@@ -30,4 +39,4 @@
     </querytext>
   </fullquery>
 
-</queryset>
\ No newline at end of file
+</queryset>