| Index: content/utility/utility.sb
|
| diff --git a/content/utility/utility.sb b/content/utility/utility.sb
|
| index 0e0bf767d8ffe495a51a26b8b958f56937373dfa..06c0e5a0620378b23c4adb559a87315bf6347096 100644
|
| --- a/content/utility/utility.sb
|
| +++ b/content/utility/utility.sb
|
| @@ -14,4 +14,7 @@
|
| ; *** The contents of content/common/common.sb are implicitly included here. ***
|
|
|
| ; Enable full access to given directory if needed.
|
| -;ENABLE_DIRECTORY_ACCESS
|
| +(if (param-defined? perm-dir)
|
| + (begin
|
| + (allow file-read-metadata )
|
| + (allow file-read* file-write* (regex (string-append #"" (param perm-dir))))))
|
|
|