X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=inline;f=scm%2Flily.scm;h=27ba76ab378e3d0b1670666bf323b0089f0dada6;hb=1dea998831fcfb367bf89e2eb5038e00bb7d0b5f;hp=7f3f2975ac3c0f4155ca7943fde32693a10e1459;hpb=145389636e81237d560aba4d04abcb89fa60cd9c;p=lilypond.git

diff --git a/scm/lily.scm b/scm/lily.scm
index 7f3f2975ac..27ba76ab37 100644
--- a/scm/lily.scm
+++ b/scm/lily.scm
@@ -1,6 +1,6 @@
 ;;;; This file is part of LilyPond, the GNU music typesetter.
 ;;;;
-;;;; Copyright (C) 1998--2014 Jan Nieuwenhuizen <janneke@gnu.org>
+;;;; Copyright (C) 1998--2015 Jan Nieuwenhuizen <janneke@gnu.org>
 ;;;; Han-Wen Nienhuys <hanwen@xs4all.nl>
 ;;;;
 ;;;; LilyPond is free software: you can redistribute it and/or modify
@@ -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.