]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/validators/validators.factor
Switch to https urls
[factor.git] / basis / validators / validators.factor
index 26fed3486801433641a83a9654ee68ca7d8421e4..360c6adcc31286f6a9b07d3e77162982b8850f0d 100644 (file)
@@ -1,5 +1,5 @@
 ! Copyright (C) 2006, 2010 Slava Pestov
-! See http://factorcode.org/license.txt for BSD license.
+! See https://factorcode.org/license.txt for BSD license.
 USING: kernel make math math.functions math.parser ranges regexp
 sequences sets unicode xmode.catalog ;
 IN: validators
@@ -57,7 +57,7 @@ IN: validators
     [ 2drop ] [ drop "invalid " prepend throw ] if ;
 
 : v-email ( str -- str )
-    ! From http://www.regular-expressions.info/email.html
+    ! From https://www.regular-expressions.info/email.html
     320 v-max-length
     "e-mail"
     R/ [A-Z0-9._%+-]+@[A-Z0-9.-]+\.[A-Z]{2,4}/i