Security

2008-06-18 03:28:15 -05:00 · 2008-06-18 03:28:15 -05:00 · 5a133ceece
parent db6b24614f
commit 5a133ceece
1 changed files with 3 additions and 1 deletions
--- a/extra/furnace/auth/features/deactivate-user/deactivate-user.factor
+++ b/extra/furnace/auth/features/deactivate-user/deactivate-user.factor
@ -16,7 +16,9 @@ IN: furnace.auth.features.deactivate-user
        ] >>submit ;
    
 : allow-deactivation ( realm -- realm )
-    <deactivate-user-action> "deactivate-user" add-responder ;
+    <deactivate-user-action> <protected>
+        "delete your profile" >>description
+    "deactivate-user" add-responder ;

 : allow-deactivation? ( -- ? )
    realm get responders>> "deactivate-user" swap key? ;