1
0
mirror of https://github.com/rkd77/elinks.git synced 2024-12-04 14:46:47 -05:00

Insert missing ':' after 'id', use tab for indentation

This commit is contained in:
Jonas Fonseca 2006-01-09 00:01:09 +01:00 committed by Jonas Fonseca
parent 4aa57ffc59
commit a7fb4a71e3

View File

@ -34,7 +34,7 @@ while (<FILEIN>)
elsif ($_ =~ /\s*([A-Z0-9_]+)(\s+=\s+[0-9]+)?,\s*\/\*::\s*(.*)\s+\*\/$/) elsif ($_ =~ /\s*([A-Z0-9_]+)(\s+=\s+[0-9]+)?,\s*\/\*::\s*(.*)\s+\*\/$/)
{ {
print STDOUT "\n" if $gotone; print STDOUT "\n" if $gotone;
$_ =~ s/\s*([A-Z0-9_]+)(\s+=\s+[0-9]+|),\s*\/\*::\s*(.*)\s+\*\/$/id[$1]::\n $3/; $_ =~ s/\s*([A-Z0-9_]+)(\s+=\s+[0-9]+|),\s*\/\*::\s*(.*)\s+\*\/$/id:[$1]::\n\t$3/;
$found = 'sorta'; $gotone = $.; $found = 'sorta'; $gotone = $.;
} }
print STDOUT "\n" and $gotone = undef if $gotone and $gotone < $.; print STDOUT "\n" and $gotone = undef if $gotone and $gotone < $.;