From 3c5a959ff4053997a9e4c5ee361a1f3f097f44be Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Thu, 6 Mar 2008 03:02:01 -0600
Subject: [PATCH] Remove obsolete file

---
 extra/http/server/auth/auth.factor | 25 -------------------------
 1 file changed, 25 deletions(-)
 delete mode 100755 extra/http/server/auth/auth.factor

diff --git a/extra/http/server/auth/auth.factor b/extra/http/server/auth/auth.factor
deleted file mode 100755
index a53905bce1..0000000000
--- a/extra/http/server/auth/auth.factor
+++ /dev/null
@@ -1,25 +0,0 @@
-! Copyright (C) 2008 Slava Pestov.
-! See http://factorcode.org/license.txt for BSD license.
-IN: http.server.auth
-USING: new-slots accessors http.server.auth.providers.null
-http.server.auth.strategies.null ;
-
-TUPLE: authentication responder provider strategy ;
-
-: <authentication> ( responder -- authentication )
-    null-auth-provider null-auth-strategy
-    authentication construct-boa ;
-
-SYMBOL: current-user-id
-SYMBOL: auth-provider
-SYMBOL: auth-strategy
-
-M: authentication call-responder ( request path responder -- response )
-    dup provider>> auth-provider set
-    dup strategy>> auth-strategy set
-    pick auth-provider get logged-in? dup current-user-id set
-    [
-        responder>> call-responder
-    ] [
-        2drop auth-provider get require-login
-    ] if* ;