Ignore:
Timestamp:
2009-01-26T10:35:02+01:00 (16 years ago)
Author:
skela
Message:

i18n/conv*.pl: Generate Java code that compiles.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • applications/editors/josm/i18n/convsurveyor.pl

    r12484 r13392  
    1111# This is a simple conversion and in no way a complete XML parser
    1212# but it works with a default Perl installation
     13
     14# Print a header to write valid Java code.  No line break,
     15# so that the input and output line numbers will match.
     16print "class trans_surveyor { void tr(String s){} void f() {";
    1317
    1418while(my $line = <>)
     
    2529  elsif($line =~ /<button label=\"(.*?)\"/)
    2630  {
    27     print "tr(\"$1\") // $_\n";
     31    print "tr(\"$1\"); // $line\n";
    2832  }
    2933  else
     
    3236  }
    3337}
     38
     39print "}}\n";
Note: See TracChangeset for help on using the changeset viewer.