diff options
author | Peter Bex <peter@more-magic.net> | 2011-03-20 19:37:12 +0100 |
---|---|---|
committer | Peter Bex <peter@more-magic.net> | 2011-03-20 19:37:12 +0100 |
commit | 0b8bffe234dde019f459777d0a5eb3ea99b32601 (patch) | |
tree | 00e57d2827f014acfc0a91292e6a0cd855879c89 | |
parent | d6d8372734f153fd6d2d550e94b7816dd7fed297 (diff) | |
download | henrietta-cache-0b8bffe234dde019f459777d0a5eb3ea99b32601.tar.gz |
Fix bug in error-handling code when release-info could not be retrieved
-rw-r--r-- | henrietta-cache.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/henrietta-cache.scm b/henrietta-cache.scm index 3eea0ef..05d1925 100644 --- a/henrietta-cache.scm +++ b/henrietta-cache.scm @@ -123,7 +123,8 @@ EOF (fprintf (current-error-port) "Could not fetch release-info file for egg ~A from ~A\n" egg-name uri) - (flush-output (current-error-port))) + (flush-output (current-error-port)) + '()) (with-input-from-request uri #f read-file))) (define (update-egg-cache) |