[Scoop-checkins] cvs commit in scoop/lib/Scoop

[cvs at versionhost.com]

Commit info for scoop/lib/Scoop:

Modified Files:
      Tag: CURRENT
	DB.pm 
Log Message:
Found some misplaced semicolons. --j



Index: DB.pm
===================================================================
RCS file: /cvs/scoop/scoop/lib/Scoop/DB.pm,v
retrieving revision 1.21.2.1
retrieving revision 1.21.2.2
diff -r1.21.2.1 -r1.21.2.2
31a32,33
>         } elsif ($args->{SHARED_USER}) {
>                 $dbh = $S->{SHARED_USER_DB};
165a168,169
>         } elsif ($args->{SHARED_USER}) {
>                 $dbh = $S->{SHARED_USER_DB};
199a204,205
>         } elsif ($args->{SHARED_USER}) {
>                 $dbh = $S->{SHARED_USER_DB};
235a242,243
>         } elsif ($args->{SHARED_USER}) {
>                 $dbh = $S->{SHARED_USER_DB};
266a275,276
>         } elsif ($args->{SHARED_USER}) {
>                 $dbh = $S->{SHARED_USER_DB};
287c297
< 	if ($args->{DEBUG} || $DEBUG) {warn "in db_unlock_tables: Query is $query\n"};
---
> 	if ($args->{DEBUG} || $DEBUG) {warn "in db_unlock_tables: Query is $query\n";}
291a302,303
>         } elsif ($args->{SHARED_USER}) {
>                 $dbh = $S->{SHARED_USER_DB};
318c330
<         if ($args->{DEBUG} || $DEBUG) {warn "in db_start_transaction: Query is $query\n"};
---
>         if ($args->{DEBUG} || $DEBUG) {warn "in db_start_transaction: Query is $query\n";}
322a335,336
> 	} elsif ($args->{SHARED_USER}) {
> 		$dbh = $S->{SHARED_USER_DB};
346c360
<         if ($args->{DEBUG} || $DEBUG) {warn "in db_commit: Query is $query\n"};
---
>         if ($args->{DEBUG} || $DEBUG) {warn "in db_commit: Query is $query\n";}
350a365,366
>         } elsif ($args->{SHARED_USER}) {
>                 $dbh = $S->{SHARED_USER_DB};
374c390
<         if ($args->{DEBUG} || $DEBUG) {warn "in db_rollback: Query is $query\n"};
---
>         if ($args->{DEBUG} || $DEBUG) {warn "in db_rollback: Query is $query\n";}
378a395,396
>         } elsif ($args->{SHARED_USER}) {
>                 $dbh = $S->{SHARED_USER_DB};