Index: content/utility/utility.sb |
diff --git a/content/utility/utility.sb b/content/utility/utility.sb |
index 0e0bf767d8ffe495a51a26b8b958f56937373dfa..c60b4be9f1f7f2bdace4dac38668e98e31d9316e 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? permitted-dir) |
+ (begin |
+ (allow file-read-metadata ) |
+ (allow file-read* file-write* (regex (param permitted-dir))))) |