webbrowser: add tests for url-like.

diff --git a/basis/webbrowser/webbrowser-tests.factor b/basis/webbrowser/webbrowser-tests.factor
new file mode 100644 (file)
index 0000000..75bcd59
--- /dev/null
+++ b/basis/webbrowser/webbrowser-tests.factor
@@ -0,0 +1,7 @@
+USING: tools.test ;
+IN: webbrowser
+
+{ t } [ "http://reddit.com" url-like? ] unit-test
+{ t } [ "https://reddit.com" url-like? ] unit-test
+{ f } [ "ftp://reddit.com" url-like? ] unit-test
+{ f } [ 123 url-like? ] unit-test