Fix non-loading of apikeys.
This commit is contained in:
parent
91a70ebb46
commit
8dcc00b516
1 changed files with 2 additions and 2 deletions
|
@ -113,13 +113,13 @@
|
|||
mb))
|
||||
(cdr transactions))))))
|
||||
|
||||
;; Reads the payments
|
||||
;; Reads the accounts list, returns '() upon error.
|
||||
(define (load-accounts-list apikeys)
|
||||
(call/cc
|
||||
(lambda (ret)
|
||||
(with-exception-handler
|
||||
(lambda (ex)
|
||||
(ret #f))
|
||||
(ret '()))
|
||||
(lambda ()
|
||||
(map (compose car string-split)
|
||||
(read-lines
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue