[Openinteract-commits] CVS: OpenInteract2/pkg/base_page/OpenInteract2 Page.pm,1.11,1.12

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

Update of /cvsroot/openinteract/OpenInteract2/pkg/base_page/OpenInteract2
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23991/OpenInteract2

Modified Files:
	Page.pm 
Log Message:
OIN-51: ensure storage classes are loaded at startup

Index: Page.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/pkg/base_page/OpenInteract2/Page.pm,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -d -r1.11 -r1.12
*** Page.pm	11 May 2004 04:30:59 -0000	1.11
--- Page.pm	5 Oct 2004 03:21:52 -0000	1.12
***************
*** 28,36 ****
  
  
- sub _class_initialize {
-     my ( $class ) = @_;
-     eval "require $_" for ( values %STORAGE_CLASS );
- }
- 
  ########################################
  # CLASS METHODS
--- 28,31 ----
***************
*** 409,412 ****
--- 404,422 ----
  }
  
+ 
+ sub load_init {
+     $log ||= get_logger( LOG_APP );
+     for ( values %STORAGE_CLASS ) {
+         eval "require $_";
+         if ( $@ ) {
+             $log->error( "Failed to load page storage class ",
+                          "'$_': $@; continuing..." );
+         }
+     }
+ }
+ 
+ load_init();
+ 
+ 
  1;