CVS: ispman/lib create_vhost_directories.lib,1.7,1.8

Update of /cvsroot/ispman/ispman/lib
In directory sc8-pr-cvs1:/tmp/cvs-serv20655

Modified Files:
	create_vhost_directories.lib 
Log Message:
just changing the order in which the parameters were passed to maintain backwards compatibility.

Added log_message call to log properly to the log file



Index: create_vhost_directories.lib
===================================================================
RCS file: /cvsroot/ispman/ispman/lib/create_vhost_directories.lib,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -r1.7 -r1.8
*** create_vhost_directories.lib	26 Jun 2003 19:13:45 -0000	1.7
--- create_vhost_directories.lib	7 Oct 2003 15:33:20 -0000	1.8
***************
*** 1,6 ****
  sub create_vhost_directories_handler{
  	
! 	my ($vhost, $home_directory, $document_root, $script_dir, $log_dir, $stat_dir, $owner, $group)=@_;
! 	
  	my @directories=();
  	push @directories, "$home_directory/vhosts/$vhost";
--- 1,6 ----
  sub create_vhost_directories_handler{
  	
! 	my ($vhost, $home_directory, $document_root, $script_dir, $owner, $group, $log_dir, $stat_dir)=@_;
! 
  	my @directories=();
  	push @directories, "$home_directory/vhosts/$vhost";
***************
*** 18,24 ****
  		push @commands, "chgrp  $group  $_";
  	}
! 			
  	for (@commands){
! 		print "Running: $_ \n";
  		system($_) == 0 or return "ERROR: $?";
  	}
--- 18,24 ----
  		push @commands, "chgrp  $group  $_";
  	}
! 
  	for (@commands){
! 		log_message("System: $_");
  		system($_) == 0 or return "ERROR: $?";
  	}



-------------------------------------------------------
This sf.net email is sponsored by:ThinkGeek
Welcome to geek heaven.
http://thinkgeek.com/sf