Changeset 157
- Timestamp:
- 02/20/07 13:08:30 (2 years ago)
- Files:
-
- trunk/src/core/Kwiki/kwiki (modified) (1 diff)
- trunk/src/core/Kwiki/lib/Kwiki/Files.pm (modified) (1 diff)
- trunk/src/core/Kwiki/src/index.cgi (modified) (1 diff)
- trunk/src/plugins/miyagawa/Kwiki-FastCGI/lib/Kwiki/FastCGI.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/src/core/Kwiki/kwiki
r150 r157 31 31 32 32 BEGIN { 33 my @env_files = qw( kwiki.env .ht-kwiki.env);34 push @env_files, "$ENV{HOME}/.kwiki/ kwiki.env" if defined $ENV{HOME};33 my @env_files = qw(_kwiki .ht_kwiki); 34 push @env_files, "$ENV{HOME}/.kwiki/_kwiki" if defined $ENV{HOME}; 35 35 my $fh; 36 36 for (@env_files) { open $fh, $_ and last } trunk/src/core/Kwiki/lib/Kwiki/Files.pm
r150 r157 13 13 BEGIN { 14 14 my $fh; 15 for (qw( kwiki.env .ht-kwiki.env)) { open $fh, $_ and last }15 for (qw(_kwiki .ht_kwiki)) { open $fh, $_ and last } 16 16 do { $ENV{$1} = $2 if /^(\w+)\s*=\s*['"]?(.*?)['"]?\s*$/ } for <$fh>; 17 17 } trunk/src/core/Kwiki/src/index.cgi
r154 r157 3 3 BEGIN { 4 4 my $fh; 5 for (qw( kwiki.env .ht-kwiki.env)) { open $fh, $_ and last }5 for (qw(_kwiki .ht_kwiki)) { open $fh, $_ and last } 6 6 do { $ENV{$1} = $2 if /^(\w+)\s*=\s*['"]?(.*?)['"]?\s*$/ } for <$fh>; 7 7 } trunk/src/plugins/miyagawa/Kwiki-FastCGI/lib/Kwiki/FastCGI.pm
r152 r157 46 46 BEGIN { 47 47 my $fh; 48 for (qw( kwiki.env .ht-kwiki.env)) { open $fh, $_ and last }48 for (qw(_kwiki .ht_kwiki)) { open $fh, $_ and last } 49 49 do { $ENV{$1} = $2 if /^(\w+)\s*=\s*['"]?(.*?)['"]?\s*$/ } for <$fh>; 50 50 }
