diff options
| author | Arun Isaac | 2018-09-12 17:52:08 +0530 |
|---|---|---|
| committer | Arun Isaac | 2018-09-12 17:55:19 +0530 |
| commit | 2784c121d5a3c9d8e7831c883edac3b6857bc198 (patch) | |
| tree | ca03f80a787a3502524257277321c2b647e78632 /build-aux | |
| parent | 959941b87c2e7ba732cae8ad1943432dfba83427 (diff) | |
| download | guile-email-2784c121d5a3c9d8e7831c883edac3b6857bc198.tar.gz guile-email-2784c121d5a3c9d8e7831c883edac3b6857bc198.tar.lz guile-email-2784c121d5a3c9d8e7831c883edac3b6857bc198.zip | |
Untabify and re-indent all sources.
* build-aux/test-driver.scm, email/base64.scm, email/email.scm,
email/quoted-printable.scm, email/utils.scm,
tests/quoted-printable.scm: Untabify and re-indent.
Diffstat (limited to 'build-aux')
| -rw-r--r-- | build-aux/test-driver.scm | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/build-aux/test-driver.scm b/build-aux/test-driver.scm index 25aaf44..0daad1d 100644 --- a/build-aux/test-driver.scm +++ b/build-aux/test-driver.scm @@ -18,8 +18,8 @@ ;;; <http://www.gnu.org/licenses/>. (use-modules (ice-9 getopt-long) - (srfi srfi-26) - (srfi srfi-64)) + (srfi srfi-26) + (srfi srfi-64)) ;; Currently, only log-file and trs-file are understood. Everything ;; else is ignored. @@ -35,11 +35,11 @@ (let ((runner (test-runner-simple))) (test-runner-on-test-end! runner (lambda (runner) - (format trs-port ":test-result: ~A ~A~%" - (string-upcase - (symbol->string - (test-result-kind runner))) - (test-runner-test-name runner)))) + (format trs-port ":test-result: ~A ~A~%" + (string-upcase + (symbol->string + (test-result-kind runner))) + (test-runner-test-name runner)))) runner)) @@ -48,4 +48,4 @@ (call-with-output-file (option-ref opts 'trs-file #f) (lambda (trs-port) (test-with-runner (my-gnu-runner trs-port) - (load-from-path (option-ref opts 'test-name #f)))))) + (load-from-path (option-ref opts 'test-name #f)))))) |