aboutsummaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
Diffstat (limited to 'examples')
-rwxr-xr-xexamples/dump-species-metadata.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/dump-species-metadata.scm b/examples/dump-species-metadata.scm
index a7e242a..d761439 100755
--- a/examples/dump-species-metadata.scm
+++ b/examples/dump-species-metadata.scm
@@ -114,7 +114,7 @@ At this point it is not very clear how Name, Name2, Symbol and Alias are used.
""
(regexp-substitute/global
#f "[^A-Za-z0-9:]"
- (field ("CAST(CONVERT(BINARY CONVERT(Strain.Name USING latin1) USING utf8) AS VARCHAR(15000))" StrainName))
+ (field Strain Name)
'pre "_" 'post)
#:separator ""
#:proc string-capitalize-first)