[MKDoc-commit] Set directory and file ownership to something more reasonable

[bruno at mkdoc.demon.co.uk]

Log Message:
-----------
Set directory and file ownership to something more reasonable

Modified Files:
--------------
    mkd/tools:
        install-details-gt.pl

-------------- next part --------------
Index: install-details-gt.pl
===================================================================
RCS file: /var/spool/cvs/mkd/tools/install-details-gt.pl,v
retrieving revision 1.27
retrieving revision 1.28
diff -Ltools/install-details-gt.pl -Ltools/install-details-gt.pl -u -r1.27 -r1.28
--- tools/install-details-gt.pl
+++ tools/install-details-gt.pl
@@ -32,7 +32,7 @@
 use GPanel::Config;
 
 use constant IP_ADDRESS => '69.28.204.54';
-
+use constant WWW_USER => 'nobody';
 
 our $MKDOC_DIR;
 $MKDOC_DIR = $ENV{MKDOC_DIR} || die 'MKDOC_DIR not set';
@@ -198,6 +198,7 @@
     );
 
     close FP;
+    chown $user_name, WWW_USER, "$site_dir/mksetenv.sh";
 }
 
 
@@ -207,6 +208,7 @@
     print "Creating $dir\n";
     -d $dir and return;
     mkdir $dir || die "Cannot create $dir!";
+    chown $user_name, WWW_USER, $dir;
 }