[Affelio-cvs 594] CVS update: affelio/lib

Back to archive index

Tadashi Okoshi slash****@users*****
2005年 10月 24日 (月) 20:37:26 JST


Index: affelio/lib/Affelio.pm
diff -u affelio/lib/Affelio.pm:1.19 affelio/lib/Affelio.pm:1.20
--- affelio/lib/Affelio.pm:1.19	Mon Oct 24 17:52:49 2005
+++ affelio/lib/Affelio.pm	Mon Oct 24 20:37:26 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: Affelio.pm,v 1.19 2005/10/24 08:52:49 slash5234 Exp $
+# $Id: Affelio.pm,v 1.20 2005/10/24 11:37:26 slash5234 Exp $
 
 package Affelio;
 {
@@ -457,8 +457,6 @@
 	    throw Affelio::exception::SystemException("affelio.cfg not found");
 	}
 
-	#print "$self->{cfg_path}\n";
-
 	my $rootproperty = $Config->{_}->{rootproperty};
 	$self->{site__fs_root} = $Config->{site_config}->{fs_root};
 	$self->{site__web_root} = $Config->{site_config}->{web_root};
@@ -484,7 +482,8 @@
 	    opendir(DIR, "$self->{top_dir}/userdata");
 	    while (defined($dir = readdir(DIR))) {
 		if(($dir ne '.') && ($dir ne '..') 
-		   && ($dir ne 'default') && ($dir ne 'CVS')){
+		   && ($dir ne 'default') && ($dir ne 'CVS')
+		   && ($dir ne 'index.html')){
 		    $self->{site__user_dir} = 
 			$wi->PTN_dirname("$self->{top_dir}/userdata/$dir");
 		}


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