[cobalt-users] Cobalt::Meta::vsite patch

[Kevin Bonner <keb@xxxxxx>]

The problem with siteManage directories disappearing has been around for quite 
a while.  I've had to deal with this once, and that was more than enough for 
me.  Below is a patch which tries to fix the problem.  For those that 
care...either section of the patch should work, but I wanted to be more 
certain that the problem would be caught.

This was applied on several RaQ4's and so far they haven't had any issues.  I 
don't have access to other Cobalt products (XTR, 550, Qube 3, etc), so I'm 
not sure if this will work for them.

Comments/suggestions/questions are welcome.  As always, use at your own risk.

Thanks & enjoy,
Kevin Bonner


<PATCH>
Run the following:
  cd /usr/lib/perl5/site_perl/5.005/Cobalt/Meta (or the directory for 
Cobalt::Meta)
  cat /path/to/this.patch | patch
--- vsite.pm.orig	Tue Mar 18 19:13:24 2003
+++ vsite.pm	Tue Mar 18 20:14:05 2003
@@ -774,6 +774,8 @@

     if ($self->{name} eq $MainGroup) {
 	return (0, ['The primary site cannot be deleted.']);
+    } elsif ($self->{name} eq '') {
+	return (0, ['Empty site name.']);
     }

       # check for existing lock
@@ -888,7 +890,7 @@
     }

       # delete site management web pages
-    qx[ /bin/rm -fr $AdminPages_dir/siteManage/$self->{name} ];
+    qx[ cd $AdminPages_dir/siteManage; /bin/rm -fr $self->{name} ];

       # delete system group
     $ret = Cobalt::Group::group_del($self->{name});
</PATCH>