Update of /cvsroot/sandweb/sandweb/lib
In directory usw-pr-cvs1:/tmp/cvs-serv7441/lib
Modified Files:
SandWeb.pm
Log Message:
removed user objects, they are now created and used by the CGI as needed
Index: SandWeb.pm
===================================================================
RCS file: /cvsroot/sandweb/sandweb/lib/SandWeb.pm,v
retrieving revision 1.13
retrieving revision 1.14
diff -U2 -r1.13 -r1.14
--- SandWeb.pm 2001/10/18 06:05:57 1.13
+++ SandWeb.pm 2001/10/20 05:43:41 1.14
@@ -7,6 +7,4 @@
use SandWeb::UI;
use SandWeb::Auth;
-use SandWeb::Repository;
-use SandWeb::Browse;
# initiates the config class, and creates the other objects with its data
@@ -32,20 +30,4 @@
}
-# user-specific objects. Unlike the startup objects,
-# a user must be logged in before we have enough info
-# to instantiate these objects.
-sub user {
- my $class = shift;
- my %args = @_;
-
- my $repository = &_load_repository_object(%args);
- my $browse = &_load_browse_object(%args);
-
- my $self = bless {
- 'repository' => $repository,
- 'browse' => $browse,
- }
-}
-
# read in config file, and return object reference to it's data.
sub _load_conf_object {
@@ -93,15 +75,4 @@
);
return $auth;
-}
-
-sub _load_repository_object {
- my %args = @_;
- my $repository = SandWeb::Repository::->new(%args);
- return $repository;
-}
-sub _load_browse_object {
- my %args = @_;
- my $browse = SandWeb::Browse::->new(%args);
- return $browse;
}
|
