[Openinteract-commits] CVS: OpenInteract2/lib/OpenInteract2 Cache.pm,1.10,1.11

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv5273

Modified Files:
	Cache.pm 
Log Message:
debugging/doc updates

Index: Cache.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Cache.pm,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -d -r1.10 -r1.11
*** Cache.pm	18 Feb 2004 05:25:26 -0000	1.10
--- Cache.pm	31 Oct 2004 00:26:25 -0000	1.11
***************
*** 15,18 ****
--- 15,26 ----
      my ( $pkg, $conf ) = @_;
      my $class = ref $pkg || $pkg;
+     $conf ||= {};
+     $log ||= get_logger( LOG_CACHE );
+     if ( $log->is_info ) {
+         $log->info( "Instantiating new cache of class '$class'" );
+         foreach my $key ( keys %{ $conf } ) {
+             $log->info( "...with key '$key' => '$conf->{ $key }'" );
+         }
+     }
      my $self = bless( {}, $class );
      $self->{_cache_object} = $self->initialize( $conf );
***************
*** 176,179 ****
--- 184,188 ----
   use_spops      = 0
   class          = OpenInteract2::Cache::File
+  directory      = /path/to/cache
   max_size       = 2000000
   
***************
*** 286,292 ****
  object passed in:
  
!  cache_info->default_expire - Default expiration time for items
!  cache_info->max_size       - Maximum size (in bytes) of cache
!  dir->cache_content         - Root directory for content cache
  
  B<get_data( $cache_object, $key )>
--- 295,300 ----
  object passed in:
  
!  cache_info.default_expire - Default expiration time for items
!  cache_info.max_size       - Maximum size (in bytes) of cache
  
  B<get_data( $cache_object, $key )>
***************
*** 310,321 ****
  Clears the cache of all items.
  
- =head1 TODO
- 
- Nothing known.
- 
- =head1 BUGS
- 
- None known.
- 
  =head1 COPYRIGHT
  
--- 318,321 ----
***************
*** 327,329 ****
  =head1 AUTHORS
  
! Chris Winters E<lt>ch...@cw...E<gt>
\ No newline at end of file
--- 327,329 ----
  =head1 AUTHORS
  
! Chris Winters E<lt>ch...@cw...E<gt>