[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