Index: openacs-4/packages/new-portal/tcl/portal-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs.tcl,v
diff -u -r1.128 -r1.129
--- openacs-4/packages/new-portal/tcl/portal-procs.tcl	10 Apr 2002 22:13:14 -0000	1.128
+++ openacs-4/packages/new-portal/tcl/portal-procs.tcl	11 Apr 2002 20:17:52 -0000	1.129
@@ -132,7 +132,7 @@
 
     ad_proc -public  automount_point {} {
         packages such as dotlrn can automount the portal here
-    } { return "/portal"  }
+    } { return "portal"  }
 
     #
     # Main portal procs
@@ -1411,8 +1411,6 @@
         @param portal_id
         @param ds_id
     } {
-        # XXX todo permissions on availabliliy procs
-        # ad_require_permission $portal_id portal_admin_portal
         set new_p_ds_id [db_nextval acs_object_id_seq]
         db_dml insert {} 
     }