[Scummvm-cvs-logs] CVS: scummvm/tools credits.pl,1.17,1.18

Max Horn fingolfin at users.sourceforge.net
Tue May 17 16:43:01 CEST 2005


Update of /cvsroot/scummvm/scummvm/tools
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24243/tools

Modified Files:
	credits.pl 
Log Message:
Added automatic word wrapping to the about scroller

Index: credits.pl
===================================================================
RCS file: /cvsroot/scummvm/scummvm/tools/credits.pl,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -d -r1.17 -r1.18
--- credits.pl	12 May 2005 21:12:46 -0000	1.17
+++ credits.pl	17 May 2005 23:41:35 -0000	1.18
@@ -297,10 +297,8 @@
 	} elsif ($mode eq "CPP") {
 		my $line_start = '"\\\\L\\\\c0""';
 		my $line_end = '",';
-		$Text::Wrap::separator = $line_end . "\n" . $line_start;
-		print $line_start . wrap("", "", $text) . $line_end . "\n";
+		print $line_start . $text . $line_end . "\n";
 		print $line_start . $line_end . "\n";
-		$Text::Wrap::separator = "\n";
 	} elsif ($mode eq "XML") {
 		print "  <row><entry namest='start' nameend='job'>" . $text . "</entry></row>\n";
 		print "  <row><entry namest='start' nameend='job'> </entry></row>\n\n";





More information about the Scummvm-git-logs mailing list