diff options
| author | Mathieu Lirzin <mthl@gnu.org> | 2016-07-24 01:05:29 +0200 |
|---|---|---|
| committer | Mathieu Lirzin <mthl@gnu.org> | 2016-12-28 22:19:04 +0100 |
| commit | 4d518fd3f114a397fe6a3380513409293a721ab8 (patch) | |
| tree | 3fd2fa673be0b1d94a610d0a789b280563db973e /src/mcron/redirect.scm | |
| parent | d4b4ac5708385d500f566267719124c7c62572df (diff) | |
| download | mcron-4d518fd3f114a397fe6a3380513409293a721ab8.tar.gz mcron-4d518fd3f114a397fe6a3380513409293a721ab8.tar.bz2 mcron-4d518fd3f114a397fe6a3380513409293a721ab8.zip | |
all: Gather module imports.
* src/mcron/base.scm: Gather module imports.
* src/mcron/redirect.scm: Likewise.
* src/mcron/vixie-specification.scm: Likewise.
* src/mcron/vixie-time.scm: Likewise.
Diffstat (limited to 'src/mcron/redirect.scm')
| -rw-r--r-- | src/mcron/redirect.scm | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/src/mcron/redirect.scm b/src/mcron/redirect.scm index 7474c4a..6711407 100644 --- a/src/mcron/redirect.scm +++ b/src/mcron/redirect.scm @@ -33,12 +33,11 @@ ;;;; Code: (define-module (mcron redirect) - #:export (with-mail-out) + #:use-module (ice-9 popen) #:use-module (ice-9 regex) - #:use-module ((mcron config) :select (config-sendmail)) - #:use-module (mcron vixie-time)) - - + #:use-module (mcron config) + #:use-module (mcron vixie-time) + #:export (with-mail-out)) ;; An action string consists of a sequence of characters forming a command ;; executable by the shell, possibly followed by an non-escaped percentage @@ -63,8 +62,6 @@ ;; the string, and output (including the error output) being sent to a pipe ;; opened on a mail transport. -(use-modules (ice-9 popen)) - (define (with-mail-out action . user) ;; Determine the name of the user who is to recieve the mail, looking for a |