ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/lib/cf.pm
(Generate patch)

Comparing deliantra/server/lib/cf.pm (file contents):
Revision 1.307 by root, Sun Jul 15 22:39:48 2007 UTC vs.
Revision 1.308 by root, Mon Jul 16 14:09:40 2007 UTC

1619 $self->init; # pass $1 etc. 1619 $self->init; # pass $1 etc.
1620 return $self; 1620 return $self;
1621 } 1621 }
1622 } 1622 }
1623 1623
1624 Carp::carp "unable to resolve path '$path' (base '$base')."; 1624 Carp::cluck "unable to resolve path '$path' (base '$base').";
1625 () 1625 ()
1626} 1626}
1627 1627
1628sub init { 1628sub init {
1629 my ($self) = @_; 1629 my ($self) = @_;
1907 1907
1908 undef $MAP_PREFETCH{$path}; 1908 undef $MAP_PREFETCH{$path};
1909 $MAP_PREFETCHER ||= cf::async { 1909 $MAP_PREFETCHER ||= cf::async {
1910 while (%MAP_PREFETCH) { 1910 while (%MAP_PREFETCH) {
1911 for my $path (keys %MAP_PREFETCH) { 1911 for my $path (keys %MAP_PREFETCH) {
1912 my $map = find $path 1912 if (my $map = find $path) {
1913 or next;
1914 $map->load; 1913 $map->load;
1914 }
1915 1915
1916 delete $MAP_PREFETCH{$path}; 1916 delete $MAP_PREFETCH{$path};
1917 } 1917 }
1918 } 1918 }
1919 undef $MAP_PREFETCHER; 1919 undef $MAP_PREFETCHER;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines