steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fix validators

db4
Doug Coleman 2009-01-20 18:44:38 -06:00
parent 68cacc70ef
commit dfadad05e2
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/validators/validators.factor
View File

@ -65,7 +65,7 @@ IN: validators
v-regexp ;
: v-url ( str -- str )
"URL" R' (ftp|http|https)://\S+' v-regexp ;
"URL" R' (?:ftp|http|https)://\S+' v-regexp ;
: v-captcha ( str -- str )
dup empty? [ "must remain blank" throw ] unless ;