[WWcvs] webwork-modperl: Fixed some indenting.

[jj v. a. <we...@ma...>]

Log Message:
-----------
Fixed some indenting.

Modified Files:
--------------
    webwork-modperl/lib/WeBWorK/ContentGenerator:
        ProblemSets.pm

Revision Data
-------------
Index: ProblemSets.pm
===================================================================
RCS file: /webwork/cvs/system/webwork-modperl/lib/WeBWorK/ContentGenerator/ProblemSets.pm,v
retrieving revision 1.61
retrieving revision 1.62
diff -Llib/WeBWorK/ContentGenerator/ProblemSets.pm -Llib/WeBWorK/ContentGenerator/ProblemSets.pm -u -r1.61 -r1.62
--- lib/WeBWorK/ContentGenerator/ProblemSets.pm
+++ lib/WeBWorK/ContentGenerator/ProblemSets.pm
@@ -370,36 +370,36 @@
 	} else {
 	    my ( $startTime, $score );
 
-	    if ( defined( $set->assignment_type() ) && 
+		if ( defined( $set->assignment_type() ) && 
 		 $set->assignment_type() =~ /gateway/ &&
 		 $set->set_id() =~ /,v\d+$/ ) {
-		$startTime = localtime( $set->version_creation_time() );
+			$startTime = localtime( $set->version_creation_time() );
 
-        # find score
-		my @problemRecords = $db->getAllUserProblems( $set->user_id(),
+			# find score
+			my @problemRecords = $db->getAllUserProblems( $set->user_id(),
 							      $set->set_id() );
-		my $possible = 0;
-		$score = 0;
-		foreach my $pRec ( @problemRecords ) {
-		    if ( defined( $pRec ) && $score ne 'undef' ) {
-			$score += $pRec->status() || 0;
-		    } else {
-			$score = 'undef';
-		    }
-		    $possible++;
+			my $possible = 0;
+			$score = 0;
+			foreach my $pRec ( @problemRecords ) {
+				if ( defined( $pRec ) && $score ne 'undef' ) {
+					$score += $pRec->status() || 0;
+				} else {
+					$score = 'undef';
+				}
+				$possible++;
+			}
+			$score = "$score/$possible";
+		} else {
+			$startTime = ' ';
+			$score = $startTime;
 		}
-		$score = "$score/$possible";
-	    } else {
-		$startTime = ' ';
-		$score = $startTime;
-	    }
-	    return CGI::Tr(CGI::td([
-                             $control,
-                             $interactive,
-                             $score,
-                             $startTime,
-                             $status,
-            ]));
+		return CGI::Tr(CGI::td([
+		                     $control,
+		                     $interactive,
+		                     $score,
+		                     $startTime,
+		                     $status,
+		]));
 	}
 }