You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
24 lines
812 B
24 lines
812 B
From: Guillaume Brochu <guillaume.brochu@gmail.com> |
|
Date: Sun, 21 Oct 2018 15:02:09 -0400 |
|
Subject: gwd.ml-readauth |
|
|
|
Goal: allow auth file to be kept outside geneweb restricted environment |
|
Fixes: #287392 |
|
Status wrt upstream: will not be applied because of upstream design choices |
|
--- |
|
src/gwd.ml | 2 +- |
|
1 file changed, 1 insertion(+), 1 deletion(-) |
|
|
|
diff --git a/src/gwd.ml b/src/gwd.ml |
|
index 783fd7b..a9c2146 100644 |
|
--- a/src/gwd.ml |
|
+++ b/src/gwd.ml |
|
@@ -1388,7 +1388,7 @@ value auth_err request auth_file = |
|
let auth = Wserver.extract_param "authorization: " '\r' request in |
|
if auth <> "" then |
|
match |
|
- try Some (Secure.open_in auth_file) with [ Sys_error _ -> None ] |
|
+ try Some (open_in auth_file) with [ Sys_error _ -> None ] |
|
with |
|
[ Some ic -> |
|
let auth =
|
|
|