Commits

Palmer, 2E0EOL committed 6f3d221

Support unified and context diff.

Comments (0)

Files changed (1)

 {
 	my ( $failName );
 	my %Params = @_;
+	my $style = 'Context';
+	$style = 'Unified' if ( $Params{Unified} );
 
 	# Do all error handling first.
 	die "Two files must be specified for comparison\n"
 		if ( $failName );
 
 	# Now let's do tje comparison.
-	#my $diff = diff $Params{FileA}, $Params{FileB}, { STYLE => "Context" };
+	my $diff = diff $Params{FileA}, $Params{FileB}, { STYLE => $style };
+	print $diff;
 }
 #----------------------------------------------------------------------------
 exit(Main());