Validate all fields and make regexp stricter
This commit is contained in:
@@ -35,7 +35,8 @@ feature -- Implementation
|
|||||||
if not regexp.is_compiled then
|
if not regexp.is_compiled then
|
||||||
regexp.compile (regexp_string)
|
regexp.compile (regexp_string)
|
||||||
end
|
end
|
||||||
Result := regexp.matches (input)
|
|
||||||
|
Result := (not input.is_empty) and regexp.matches (input)
|
||||||
end
|
end
|
||||||
|
|
||||||
feature -- State
|
feature -- State
|
||||||
|
|||||||
@@ -36,8 +36,6 @@ feature -- Validation
|
|||||||
is_valid := True
|
is_valid := True
|
||||||
across
|
across
|
||||||
controls as c
|
controls as c
|
||||||
until
|
|
||||||
is_valid = False
|
|
||||||
loop
|
loop
|
||||||
if attached {WSF_VALIDATABLE} c.item as elem then
|
if attached {WSF_VALIDATABLE} c.item as elem then
|
||||||
elem.validate
|
elem.validate
|
||||||
|
|||||||
Reference in New Issue
Block a user