Changeset 11029
- Timestamp:
- 2006-01-12T12:05:21+13:00 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/bin/script/gti.pl
r11026 r11029 853 853 elsif ($line =~ m/^(_\w+_)/) { 854 854 my $macro_key = $1; 855 $line =~ s/\s*([^\\]\# .+)?$//; # Remove any comments and nasty whitespace855 $line =~ s/\s*([^\\]\#[^\}]+)?$//; # Remove any comments and nasty whitespace 856 856 857 857 # While there is still text of the macro to go... … … 863 863 } 864 864 $line = $file_lines[$i]; 865 $line =~ s/\s*([^\\]\# .+)?$//; # Remove any comments and nasty whitespace865 $line =~ s/\s*([^\\]\#[^\}]+)?$//; # Remove any comments and nasty whitespace 866 866 } 867 867
Note:
See TracChangeset
for help on using the changeset viewer.