Index: openacs-4/packages/bboard-portlet/tcl/bboard-portlets-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bboard-portlet/tcl/Attic/bboard-portlets-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/bboard-portlet/tcl/bboard-portlets-procs.tcl	30 Sep 2001 23:50:33 -0000	1.1
+++ openacs-4/packages/bboard-portlet/tcl/bboard-portlets-procs.tcl	1 Oct 2001 00:06:17 -0000	1.2
@@ -4,8 +4,8 @@
 
     Procedures to supports bboard portlets
 
-    @author mbryzek@arsdigita.com
-    @creation-date 2001-03-01
+    @author arjun@openforce.net
+    @creation-date September 30 2001
     @$Id$
 }
 
@@ -19,21 +19,25 @@
     object_id. If no such portal exists, does nothing. This function is
     used as a callback in the acs-subsite group callback system
 
-    @author mbryzek@arsdigita.com
-    @creation-date Fri Feb  9 18:55:22 2001
+    @author arjun@openforce.net
+    @creation-date Sept 2001
 
     @return The package id of the newly mounted package, or the empty
     string if no package was mounted
 
 } {
-    if { [empty_string_p $object_id] } {
-	error "Object ID must be specified"
-    }
-
-    # Find the node ID for the portal associated with this object 
-    set node_id [portal_node_id_for_object $object_id]
-    if { [empty_string_p $node_id] } {
-	return ""
-    }
-    return [subsite::auto_mount_application -node_id $node_id bboard]
+# AKS: don't do this, although it is a neat trick that might be useful
+# in the future of dotlrn
+#
+#
+#    if { [empty_string_p $object_id] } {
+#	 error "Object ID must be specified"
+#    }
+#
+#    # Find the node ID for the portal associated with this object 
+#    set node_id [portal_node_id_for_object $object_id]
+#    if { [empty_string_p $node_id] } {
+#	 return ""
+#    }
+#    return [subsite::auto_mount_application -node_id $node_id bboard]
 }