diff options
| author | Pjotr Prins | 2024-05-14 10:10:33 +0200 |
|---|---|---|
| committer | Pjotr Prins | 2024-05-14 10:10:33 +0200 |
| commit | 952a8311e22c2062f7b090ea65577b3ec2933403 (patch) | |
| tree | 65a8f6f627e894700f52bf312c358f6b0ddbff2a /gn/data/strains.scm | |
| parent | 7f565b82472147996f803715188bd2826c47d192 (diff) | |
| download | gn-guile-952a8311e22c2062f7b090ea65577b3ec2933403.tar.gz | |
Add missing strain. Remove unused call
Diffstat (limited to 'gn/data/strains.scm')
| -rw-r--r-- | gn/data/strains.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gn/data/strains.scm b/gn/data/strains.scm index 06255e3..e5f839b 100644 --- a/gn/data/strains.scm +++ b/gn/data/strains.scm @@ -41,6 +41,8 @@ used-for-mapping? will say whether the strains/individuals are used for mapping. (define* (bxd-strain-id-names #:key (used-for-mapping? #f)) "Return assoc list of tuples of strain id + names. Same as strain-id-names, but just for the BXD. +Note that the parents are included - even if we don't use those for mapping. + used-for-mapping? will say whether the strains/individuals are used for mapping. Always True, FIXME" (filter (lambda (l) l) (map (lambda (l) |