diff options
| -rwxr-xr-x | web/webserver.scm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/web/webserver.scm b/web/webserver.scm index bb07afd..a44181c 100755 --- a/web/webserver.scm +++ b/web/webserver.scm @@ -167,10 +167,8 @@ otherwise search for set/group data" (lambda () (let* ((params (decode-query (uri-query (request-uri request)))) (query_path (assoc-ref params 'file_path))) (if query_path - ;;TODO add check for is repo - (build-json-response 400 (fetch-file repo query_path)) - (throw 'file-error (string-append "Please provide a valid file path in the query")) - ) + (build-json-response 400 (fetch-file repo query_path)) + (throw 'file-error (string-append "Please provide a valid file path in the query"))) ) ) (lambda (key . args) |