[Sandweb-commit] CVS: sandweb/lib/SandWeb Repository.pm,1.40,1.41

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

Update of /cvsroot/sandweb/sandweb/lib/SandWeb
In directory usw-pr-cvs1:/tmp/cvs-serv3034/lib/SandWeb

Modified Files:
	Repository.pm 
Log Message:
completing branch work


Index: Repository.pm
===================================================================
RCS file: /cvsroot/sandweb/sandweb/lib/SandWeb/Repository.pm,v
retrieving revision 1.40
retrieving revision 1.41
diff -U2 -r1.40 -r1.41
--- Repository.pm	20 May 2002 06:00:42 -0000	1.40
+++ Repository.pm	4 Jun 2002 18:24:59 -0000	1.41
@@ -203,8 +203,8 @@
 
 	my $repo_type = $self->get_repo_type();
-	my $date = $args{'date'};
-	my $rev = $args{'rev'};
-	my $recurse = $args{'recurse'};
-	my $file = $args{'file'};
+	my $date = $args{'date'} || '';
+	my $rev = $args{'rev'} || '';
+	my $recurse = $args{'recurse'} || '';
+	my $file = $args{'file'} || '';
 
 	if ($repo_type eq 'CVS') {
@@ -258,4 +258,8 @@
                         push (@params, "$recurse");
                 }
+                if ($message) {
+                        push (@params, 'message');
+                        push (@params, "$message");
+                }
                 if ($file) {
                         push (@params, 'file');
@@ -671,14 +675,14 @@
 	my %args = @_;
 
-	my $repo_type = $self->get_repo_type();
-	my $recurse = $args{'recurse'};
-	my $reset = $args{'reset'};
-	my $prune = $args{'prune'};
-	my $clobber = $args{'clobber'};
-	my $directories = $args{'directories'};
-	my $rev = $args{'rev'};
-	my $date = $args{'date'};
-	my $merge = $args{'merge'};
-	my $file = $args{'file'};
+	my $repo_type = $self->get_repo_type() || '';
+	my $recurse = $args{'recurse'} || '';
+	my $reset = $args{'reset'} || '';
+	my $prune = $args{'prune'} || '';
+	my $clobber = $args{'clobber'} || '';
+	my $directories = $args{'directories'} || '';
+	my $rev = $args{'rev'} || '';
+	my $date = $args{'date'} || '';
+	my $merge = $args{'merge'} || '';
+	my $file = $args{'file'} || '';
 
 	if ($repo_type eq 'CVS') {
@@ -708,5 +712,8 @@
                         push (@params, 'directories');
                         push (@params, "$directories");
-                }
+                } else {
+                        push (@params, 'directories');
+                        push (@params, '1');
+		}
                 if ($rev) {
                         push (@params, 'rev');
@@ -881,4 +888,5 @@
 		'add', 
 		'annotate', 
+		'branch',
 		'commit', 
 		'diff', 
@@ -893,5 +901,4 @@
 		'unedit', 
 		'update', 
-		'tag', 
 		'unedit', 
 		'watch',