diff options
Diffstat (limited to '')
| -rw-r--r-- | tests/gpgscm/tests.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/gpgscm/tests.scm b/tests/gpgscm/tests.scm index 1e6d7fea0..486a77e85 100644 --- a/tests/gpgscm/tests.scm +++ b/tests/gpgscm/tests.scm @@ -451,6 +451,11 @@ (rename source pathname) (list tmpfiles pathname #f))) +(define (tr:unlink pathname) + (lambda (tmpfiles source) + (unlink pathname) + (list tmpfiles pathname #f))) + (define (tr:pipe-do . commands) (lambda (tmpfiles source) (let ((t (make-temporary-file))) |