[Sandweb-commit] CVS: sandweb/lib SandWeb.pm,1.13,1.14

[Rob H. <for...@us...>]

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;
 }