From 7dbe3bddcdec6f8bb36c270d275d127a31078aa6 Mon Sep 17 00:00:00 2001 From: Munyoki Kilyungi Date: Thu, 8 Feb 2024 22:17:13 +0300 Subject: Fix how the dataset directory is constructed. Signed-off-by: Munyoki Kilyungi --- examples/dataset-metadata-git.scm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'examples/dataset-metadata-git.scm') diff --git a/examples/dataset-metadata-git.scm b/examples/dataset-metadata-git.scm index cd3081c..b6c6fc0 100755 --- a/examples/dataset-metadata-git.scm +++ b/examples/dataset-metadata-git.scm @@ -42,8 +42,11 @@ (experiment-design (get* "ExperimentDesign")) (acknowledgment (get* "Acknowledgment"))) (for-each (lambda (x) - (save-file (file-name (string-append dir-name (car x))) - (cdr x))) + (save-file + (string-append (file-name identifier) + "/" + (car x)) + (cdr x))) `(("summary.rtf" . ,summary) ("tissue.rtf" . ,tissue) ("specifics.rtf" . ,specifics) -- cgit v1.2.3