Index: applications/editors/josm/i18n/convwms.pl
===================================================================
--- applications/editors/josm/i18n/convwms.pl	(revision 12334)
+++ applications/editors/josm/i18n/convwms.pl	(revision 13392)
@@ -11,4 +11,8 @@
 # This is a simple conversion and in no way a complete XML parser
 # but it works with a default Perl installation
+
+# Print a header to write valid Java code.  No line break,
+# so that the input and output line numbers will match.
+print "class trans_wms { void tr(String s){} void f() {";
 
 while(my $line = <>)
@@ -25,5 +29,5 @@
   elsif($line =~ /^(.*?);(.*?);(.*)$/)
   {
-    print "tr(\"$2\") // $3\n";
+    print "tr(\"$2\"); // $3\n";
   }
   else
@@ -32,2 +36,4 @@
   }
 }
+
+print "}}\n";