furnace.auth.login: name of the realm is already set in the <login-realm> constructor

diff --git a/basis/furnace/auth/auth-docs.factor b/basis/furnace/auth/auth-docs.factor
index 49dae0d27571b0c4bfec972ae3a65110deef24bc..45bcb8a0ec27a8bd316cd48526583b633f803c7f 100644 (file)
--- a/basis/furnace/auth/auth-docs.factor
+++ b/basis/furnace/auth/auth-docs.factor
@@ -173,7 +173,6 @@ ARTICLE: "furnace.auth.example" "Furnace authentication example"
 { $code
 ": <login-config> ( responder -- responder' )
     \"Factor website\" <login-realm>
-        \"Factor website\" >>name
         allow-registration
         allow-password-recovery
         allow-edit-profile

diff --git a/basis/furnace/auth/login/login-tests.factor b/basis/furnace/auth/login/login-tests.factor
new file mode 100644 (file)
index 0000000..728fb6e
--- /dev/null
+++ b/basis/furnace/auth/login/login-tests.factor
@@ -0,0 +1,6 @@
+USING: accessors furnace.auth.login tools.test ;
+IN: furnace.auth.login.tests
+
+{ "Some realm" } [
+    f "Some realm" <login-realm> name>>
+] unit-test

diff --git a/extra/webapps/site-watcher/site-watcher.factor b/extra/webapps/site-watcher/site-watcher.factor
index 5045e4fdafa48954ec503ca7ad98f4c3b24d9f37..80ec7363b9ac327f50b18a7239622762fae3b3a4 100644 (file)
--- a/extra/webapps/site-watcher/site-watcher.factor
+++ b/extra/webapps/site-watcher/site-watcher.factor
@@ -57,7 +57,6 @@ IN: webapps.site-watcher
 
 : <login-config> ( responder -- responder' )
     "SiteWatcher" <login-realm>
-        "SiteWatcher" >>name
         allow-registration
         allow-password-recovery
         allow-edit-profile

diff --git a/extra/webapps/todo/todo.factor b/extra/webapps/todo/todo.factor
index ab9e578308ec9460149b746fd6167ef60c674731..eb81c2b78ad9217752526edf6c5de1276ff67554 100644 (file)
--- a/extra/webapps/todo/todo.factor
+++ b/extra/webapps/todo/todo.factor
@@ -127,7 +127,6 @@ io.sockets.secure ;
 
 : <login-config> ( responder -- responder' )
     "Todo list" <login-realm>
-        "Todo list" >>name
         allow-registration
         allow-edit-profile
         allow-deactivation ;

diff --git a/extra/websites/concatenative/concatenative.factor b/extra/websites/concatenative/concatenative.factor
index 271eb7165eebf00bed276aaec207533fefb8c6e6..46bb4eaea38784d843b6ca48ba0f84d83752efd6 100644 (file)
--- a/extra/websites/concatenative/concatenative.factor
+++ b/extra/websites/concatenative/concatenative.factor
@@ -54,7 +54,6 @@ TUPLE: concatenative-website < dispatcher ;
 
 : <login-config> ( responder -- responder' )
     "Factor website" <login-realm>
-        "Factor website" >>name
         allow-registration
         allow-password-recovery
         allow-edit-profile