Issue 4374 / 1: Fix platform identification

[lilypond.git] / scm / lily.scm

diff --git a/scm/lily.scm b/scm/lily.scm
index 6322e0196053af7480909fc3ddbbd2d148b56e00..27ba76ab378e3d0b1670666bf323b0089f0dada6 100644 (file)
--- a/scm/lily.scm
+++ b/scm/lily.scm
@@ -41,7 +41,7 @@
 (define-public PLATFORM
   (string->symbol
    (string-downcase
-    (car (string-tokenize (utsname:sysname (uname)))))))
+    (car (string-tokenize (utsname:sysname (uname)) char-set:letter)))))
 
 ;;
 ;; Session-handling variables and procedures.