Changeset 28250 in osm for applications/editors
- Timestamp:
- 2012-04-12T12:31:40+02:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
applications/editors/josm/i18n/convpreset.pl
r26247 r28250 9 9 my $group; 10 10 my $combo_n; 11 my @combo_values; 12 my $combo_idx; 11 my $combo_type; 13 12 my $result = 0; 14 13 my $comment = 0; 14 my $vctx; 15 15 16 16 # This is a simple conversion and in no way a complete XML parser … … 111 111 } 112 112 } 113 # first handle display values 114 elsif($line =~ /<(combo|multiselect).*\s+text=(".*?").*\s+display_values="(.*?)"/) 115 { 116 my ($type,$n,$vals) = ($1,fix($2),$3); 113 elsif($line =~ /<(combo|multiselect).*\s+text=(".*?")/) 114 { 115 my ($type,$n) = ($1,fix($2)); 116 $combo_n = $n; 117 $combo_type = $type; 118 $vctx = ($line =~ /values_context=(".*?")/) ? $1 : undef; 119 # text 120 my $tctx = ($line =~ /text_context=(".*?")/) ? $1 : undef; 121 print "/* item $item $type $n */" . ($tctx ? " trc($tctx, $n);" : " tr($n);"); 122 # display_values / values 117 123 my $sp = ($type eq "combo" ? ",":";"); 118 $combo_n = $n; 119 $combo_idx = 0; 120 my $vctx = ($line =~ /values_context=(".*?")/) ? $1 : undef; 121 if($line =~ /text_context=(".*?")/) 122 { 123 print "/* item $item $type $n */ trc($1,$n);"; 124 } 125 else 126 { 127 print "/* item $item $type $n */ tr($n);"; 128 } 129 $vals =~ s/\\$sp/\x91/g; 130 @combo_values = split $sp,$vals; 131 for (my $i=0; $i<@combo_values; ++$i) 132 { 133 my $val = $combo_values[$i]; 134 $val =~ s/\x91/$sp/g; 135 $combo_values[$i] = $val; 136 next if $val =~ /^[0-9-]+$/; # search for non-numbers 137 $val = fix($val); 138 print "/* item $item $type $n display value */" . ($vctx ? " trc($vctx, \"$val\");" : " tr(\"$val\");"); 139 } 140 print "\n"; 141 } 142 elsif($line =~ /<(combo|multiselect).*\s+text=(".*?").*\s+values="(.*?)"/) 143 { 144 my ($type,$n,$vals) = ($1,fix($2),$3); 145 my $sp = ($type eq "combo" ? ",":";"); 146 $combo_n = $n; 147 $combo_idx = 0; 148 my $vctx = ($line =~ /values_context=(".*?")/) ? $1 : undef; 149 if($line =~ /text_context=(".*?")/) 150 { 151 print "/* item $item $type $n */ trc($1,$n);"; 152 } 153 else 154 { 155 print "/* item $item $type $n */ tr($n);"; 156 } 157 @combo_values = split $sp,$vals; 158 foreach my $val (@combo_values) 159 { 160 next if $val =~ /^[0-9-]+$/; # search for non-numbers 161 $val = fix($val); 162 print "/* item $item $type $n display value */" . ($vctx ? " trc($vctx, \"$val\");" : " tr(\"$val\");"); 163 } 164 print "\n"; 165 } 166 elsif(!$comment && $line =~ /<short_description>(.*?)<\/short_description>/) 167 { 168 my $n = fix($1); 169 print "/* item $item combo $combo_n item \"$combo_values[$combo_idx]\" short description */ tr(\"$n\");\n"; 170 $combo_idx++; 124 my $vals = ($line =~ /display_values="(.*?)"/) ? $1 : ($line =~ /values="(.*?)"/) ? $1 : undef; 125 if($vals) 126 { 127 my @combo_values = split $sp,$vals; 128 foreach my $val (@combo_values) 129 { 130 next if $val =~ /^[0-9-]+$/; # search for non-numbers 131 $val = fix($val); 132 print "/* item $item $type $n display value */" . ($vctx ? " trc($vctx, \"$val\");" : " tr(\"$val\");"); 133 } 134 } 135 print "\n"; 136 } 137 elsif(!$comment && $line =~ /<list_entry/) 138 { 139 my $vctxi = ($line =~ /value_context=(".*?")/) ? $1 : $vctx; 140 my $value = ($line =~ /value=(".*?")/) ? $1 : undef; 141 if($line =~ /display_value=(".*?")/) 142 { 143 my $val = fix($1); 144 print "/* item $item $combo_type $combo_n entry $value display value */" . ($vctxi ? " trc($vctxi, $val);" : " tr($val);") . "\n"; 145 } 146 else 147 { 148 my $val = fix($value); 149 print "/* item $item $combo_type $combo_n entry $value display value */" . ($vctxi ? " trc($vctxi, $val);" : " tr($val);") . "\n"; 150 } 151 if($line =~ /short_description=(".*?")/) 152 { 153 my $val = fix($1); 154 print "/* item $item $combo_type $combo_n entry $value short description */ tr($val);\n"; 155 } 171 156 } 172 157 elsif($line =~ /<\/group>/) … … 183 168 { 184 169 $combo_n = ""; 185 $combo_idx = 0;186 170 } 187 171 elsif(!$line)
Note:
See TracChangeset
for help on using the changeset viewer.