[Saturday, 10 December 2011], Krzysztof Kulesza napisał(a):
Witam Pozwolilem sobie dodac jeszcze mozliwosc wyszukiwania numerow mieszkan w formacie x/y/z gdyz takie numeracje sa stosowane np w Pyskowicach W zalaczniku patch do wersji z CVS
Ten patch kasuje poprawność adresu "Krótka 1/2"
IMHO ten regexp powinien wygladać tak:
elsif ($addr =~ /\s(([0-9]+\s*[a-z]*(?:/[0-9]+\s*[a-z]*)?)/([0-9]+))$/i) {
-- Krzysztof Kulesza
--- ../../../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;
lms mailing list lms@lists.lms.org.pl http://lists.lms.org.pl/mailman/listinfo/lms