Changed files
| File | Changes | |
|---|---|---|
| modules/ryan-services/file-manager.scm | +3 −3 | raw |
Fixed download folder manager service
51bdc7674c13…
· Ryan Schanzenbacher ·
@@ -38,15 +38,15 @@
(define downloads-garbage-collector-service
(match-record-lambda <downloads-garbage-collector-configuration>
(user)
- (let ((cleanup-command #~(list "find" (string-append "/home/" #$user "/Downloads") "-mtime" "+7" "-exec" "rm" "-rf" "{}" "';'")))
+ (let ((cleanup-command #~(list "find" (string-append "/home/" #$user "/Downloads") "-mtime" "+7" "-exec" "rm" "-rf" "'{}'" ";")))
(shepherd-service
(documentation "Garbage collect downloaded files more than 1 week old for USER.")
(provision '(downloads-garbage-collector))
;(requirement '(root))
(modules '((shepherd service timer)))
(start #~(make-timer-constructor
- (calendar-event #:hours '(8) #:minutes '(20)
- #:days-of-week '(tuesday))
+ (calendar-event #:hours '(19) #:minutes '(50)
+ #:days-of-week '(monday))
(command #$cleanup-command)))
(stop #~(make-timer-destructor))
(actions (list (shepherd-action