diff options
| author | Munyoki Kilyungi | 2023-08-24 12:48:22 +0300 |
|---|---|---|
| committer | Munyoki Kilyungi | 2023-08-24 12:49:39 +0300 |
| commit | 540f0a540114be62a7049a125b0403c7d128ad90 (patch) | |
| tree | 7d58b6572545594061edebcf6ee4fc4a1da43646 | |
| parent | a50c7d3479f8220301db4dcd7b7f07a1483d0020 (diff) | |
| download | gn-transform-databases-540f0a540114be62a7049a125b0403c7d128ad90.tar.gz | |
Remove match-case for RDF-FILE
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
| -rwxr-xr-x | load-rdf.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/load-rdf.scm b/load-rdf.scm index 5dcfd62..0b90958 100755 --- a/load-rdf.scm +++ b/load-rdf.scm @@ -89,7 +89,7 @@ CHECKPOINT;" (define main (match-lambda* - ((_ connection-settings-file rdf-file) + ((_ connection-settings-file) (let ((connection-settings (call-with-input-file connection-settings-file read))) @@ -119,7 +119,7 @@ CHECKPOINT;" (assq-ref connection-settings 'virtuoso-password) %graph-uri))))) ((arg0 _ ...) - (format (current-error-port) "Usage: ~a CONNECTION-SETTINGS-FILE RDF-FILE-OR-RDF-DIR~%" arg0) + (format (current-error-port) "Usage: ~a CONNECTION-SETTINGS-FILE~%" arg0) (exit #f)))) (apply main (command-line)) |