Index: openacs-4/packages/dotlrn-portlet/tcl/dotlrn-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/tcl/dotlrn-portlet-procs.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/dotlrn-portlet/tcl/dotlrn-portlet-procs.tcl	1 Nov 2001 21:06:31 -0000	1.7
+++ openacs-4/packages/dotlrn-portlet/tcl/dotlrn-portlet-procs.tcl	1 Nov 2001 23:12:05 -0000	1.8
@@ -111,9 +111,21 @@
  	@creation-date Nov 2001
     } {
  	portal::make_datasource_available \
- 		$page_id [get_datasource_id [my_name]]
+ 		$page_id [portal::get_datasource_id [my_name]]
     }
 
+    ad_proc -public make_self_unavailable { 
+	page_id 
+    } {
+	Wrapper for the portal:: proc
+	
+	@param page_id
+	@author arjun@openforce.net
+	@creation-date Nov 2001
+    } {
+	portal::make_datasource_unavailable \
+		$page_id [portal::get_datasource_id [my_name]]
+    }
 }