aboutsummaryrefslogtreecommitdiff
path: root/dump.scm
diff options
context:
space:
mode:
Diffstat (limited to 'dump.scm')
-rwxr-xr-xdump.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/dump.scm b/dump.scm
index 30cb8dd..989c027 100755
--- a/dump.scm
+++ b/dump.scm
@@ -15,7 +15,7 @@
;;; GeneNetwork database connection parameters and dump path
(define %connection-settings
- (call-with-input-file (list-ref (command-line) 0)
+ (call-with-input-file (list-ref (command-line) 1)
read))
(define (call-with-genenetwork-database proc)
@@ -31,7 +31,7 @@
proc))
(define %dump-directory
- (list-ref (command-line) 1))
+ (list-ref (command-line) 2))
(define (call-with-dump-file filename proc)
(let ((absolute-path (string-append %dump-directory filename)))