--- nfo/perl/libs/App/Process.pm 2003/02/20 18:41:48 1.1 +++ nfo/perl/libs/App/Process.pm 2003/03/27 15:43:05 1.2 @@ -1,7 +1,10 @@ ## ---------------------------------------------------------------------- -## $Id: Process.pm,v 1.1 2003/02/20 18:41:48 joko Exp $ +## $Id: Process.pm,v 1.2 2003/03/27 15:43:05 joko Exp $ ## ---------------------------------------------------------------------- ## $Log: Process.pm,v $ +## Revision 1.2 2003/03/27 15:43:05 joko +## minor fix: new comment/remark +## ## Revision 1.1 2003/02/20 18:41:48 joko ## + initial commit ## @@ -120,6 +123,8 @@ my $dbkeys; my $dbcfg; + + # CACHE THIS! JUST BOOT STORAGES INTO CONTAINER IF NOT ALREADY DONE! my $container = DesignPattern::Object->fromPackage('Data::Storage::Container'); if (my $dbkey_raw = $self->{app}->{use_databases}) {