--- ../../../lms/lms-cvs/bin/lms-teryt 2011-12-10 10:01:37.389370292 +0100 +++ lms-teryt 2011-12-10 10:33:54.835143085 +0100 @@ -624,7 +624,7 @@ sub location_update $addr = substr($addr, 0, -1 * length($1)); $house = $1; } - elsif ($addr =~ /\s(([0-9]+\s*[a-z]*)\/([0-9]+))$/i) { + elsif ($addr =~ /\s(([0-9]+\s*[a-z]*)\/([0-9]+)\/([0-9]+))$/i) { $addr = substr($addr, 0, -1 * length($1)); $house = $2; $flat = $3; @@ -641,7 +641,7 @@ sub location_update } # try to remove prefix UL., AL., PL., SKWER, BULW., RONDO, PARK, RYNEK, SZOSA, DROGA, OS., OGR��D, WYSPA, WYB. - $street =~ s/^\s*(((ul\.|pl\.|al\.|bulw\.|os\.|wyb\.)\s*)|((skwer|rondo|park|rynek|szosa|droga|ogr��d|wyspa)\s+))//i; + $street =~ s/^\s*(((ul\.|pl\.|al\.|bulw\.|os\.|wyb\.)\s*)|((plac|skwer|rondo|park|rynek|szosa|droga|ogr��d|wyspa)\s+))//i; $street =~ s/(^\s+|\s+$)//g; $city =~ s/(^\s+|\s+$)//g;