From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Sat, 6 Nov 2004 20:11:05 +0000 (+0000)
Subject: (sanitize-command-option): new function.
X-Git-Tag: release/2.4.2~3^2~3
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=8a682d0ffe936bbf9fbe47d9dcb141331b2e947e;p=lilypond.git

(sanitize-command-option): new function.
---

diff --git a/scm/lily.scm b/scm/lily.scm
index ca173e27ef..9a559b40df 100644
--- a/scm/lily.scm
+++ b/scm/lily.scm
@@ -584,7 +584,7 @@ possibly turned off."
 (define-public (sanitize-command-option str)
   (string-append
    "\""
-   (regexp-substitute/global #f "[^-0-9,.a-zA-Z'\"\\]" str 'pre 'post)
+   (regexp-substitute/global #f "[^- 0-9,.a-zA-Z'\"\\]" str 'pre 'post)
   "\""))
 
 (define-public (postscript->pdf papersizename name)