mirror of
				https://github.com/libsdl-org/SDL.git
				synced 2025-10-26 12:27:44 +00:00 
			
		
		
		
	wikiheaders: Trim whitespace from end of lines in section headers.
This commit is contained in:
		| @@ -825,21 +825,23 @@ sub print_big_ascii_string { | ||||
|             die("Don't have a big ascii entry for '$ch'!\n") if not defined $rowsref; | ||||
|             my $row = @$rowsref[$rownum]; | ||||
|  | ||||
|             my $outstr = ''; | ||||
|             if ($lowascii) { | ||||
|                 my @x = split //, $row; | ||||
|                 foreach (@x) { | ||||
|                     my $v = ($_ eq "\x{2588}") ? 'X' : ' '; | ||||
|                     print $fh $v; | ||||
|                     $outstr .= ($_ eq "\x{2588}") ? 'X' : ' '; | ||||
|                 } | ||||
|             } else { | ||||
|                 print $fh $row; | ||||
|                 $outstr = $row; | ||||
|             } | ||||
|  | ||||
|             $charidx++; | ||||
|  | ||||
|             if ($charidx < $charcount) { | ||||
|                 print $fh " "; | ||||
|             if ($charidx == $charcount) { | ||||
|                 $outstr =~ s/\s*\Z//;  # dump extra spaces at the end of the line. | ||||
|             } else { | ||||
|                 $outstr .= ' ';   # space between glyphs. | ||||
|             } | ||||
|             print $fh $outstr; | ||||
|         } | ||||
|         print $fh "\n"; | ||||
|     } | ||||
|   | ||||
		Reference in New Issue
	
	Block a user
	 Ryan C. Gordon
					Ryan C. Gordon