[Affelio-cvs 603] CVS update: affelio/lib/Affelio/misc

Back to archive index

Tadashi Okoshi slash****@users*****
2005年 10月 25日 (火) 01:50:10 JST


Index: affelio/lib/Affelio/misc/InitAffelio.pm
diff -u affelio/lib/Affelio/misc/InitAffelio.pm:1.6 affelio/lib/Affelio/misc/InitAffelio.pm:1.7
--- affelio/lib/Affelio/misc/InitAffelio.pm:1.6	Tue Oct 25 01:04:30 2005
+++ affelio/lib/Affelio/misc/InitAffelio.pm	Tue Oct 25 01:50:09 2005
@@ -14,7 +14,7 @@
 # along with this program; if not, write to the Free Software
 # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 #
-# $Id: InitAffelio.pm,v 1.6 2005/10/24 16:04:30 slash5234 Exp $
+# $Id: InitAffelio.pm,v 1.7 2005/10/24 16:50:09 slash5234 Exp $
 
 package Affelio::misc::InitAffelio;
 {
@@ -81,6 +81,7 @@
 	my $char_set = shift;
 	my $template = shift;
 	my $sendmail_path = shift;
+	my $additional_cfg = shift;
 
 	eval{
 	    open(OUT, "> $affelio_cfg_path");
@@ -92,6 +93,12 @@
 	    print OUT "\n";
 	    print OUT "[command]\n";
 	    print OUT "sendmail=$sendmail_path\n";
+
+	    if($additional_cfg){
+		print OUT "[affelio_farm]\n";
+		print OUT "$additional_cfg\n";
+	    }
+
 	    close OUT;
 
 	    chmod 0444, "$affelio_cfg_path";
@@ -424,6 +431,7 @@
 	my $locale = shift;
 	my $lh = shift;
 	my $template = shift;
+	my $additional_cfg = shift;
 	my $sendmail_path = shift;
 	#
 	my $db_type = shift;
@@ -444,6 +452,7 @@
 	debug_print("\t$locale ");
 	debug_print("\t$lh ");
 	debug_print("\t$template ");
+	debug_print("\t$additional_cfg");
 	debug_print("\t$sendmail_path ");
 	debug_print("\t$db_type ");
 	debug_print("\t$db_dbname ");
@@ -468,7 +477,8 @@
 		      $root_url,
 		      $locale,
 		      $template,
-		      $sendmail_path);
+		      $sendmail_path,
+		      $additional_cfg);
 	chmod 0700, "$root_dir/config";
 	debug_print("InitAffelio:setup (2) create affelio.cfg done.");
 


Affelio-cvs メーリングリストの案内
Back to archive index