fix: move copy files to admin role
This commit is contained in:
parent
827d090a7e
commit
1a39e0c6d2
|
|
@ -135,6 +135,7 @@
|
||||||
;; Simple file copy endpoint for manual uploads
|
;; Simple file copy endpoint for manual uploads
|
||||||
(define-page copy-files #@"/admin/copy-files" ()
|
(define-page copy-files #@"/admin/copy-files" ()
|
||||||
"Copy files from incoming directory to library"
|
"Copy files from incoming directory to library"
|
||||||
|
(require-role :admin)
|
||||||
(handler-case
|
(handler-case
|
||||||
(let ((incoming-dir (merge-pathnames "music/incoming/"
|
(let ((incoming-dir (merge-pathnames "music/incoming/"
|
||||||
(asdf:system-source-directory :asteroid)))
|
(asdf:system-source-directory :asteroid)))
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue