From: Patrick McCarty <pnorcks@gmail.com>
Date: Thu, 18 Aug 2011 06:18:46 +0000 (-0700)
Subject: Guile v2: Set 'show-file-name option correctly.
X-Git-Tag: release/2.15.9-1~9^2~47
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=95e18ed871abfad57124d6ca48834be2d7ee1044;p=lilypond.git

Guile v2: Set 'show-file-name option correctly.

This fixes a compile issue with Guile v2.

Using the `debug-enable' procedure with non-boolean debug options raises
an error with Guile v2.  The internal type for `show-file-name' is
SCM_OPTION_SCM, and this is why we can't use `debug-enable' here.

The fix is to use `debug-set!', passing the unquoted option name and
the value as arguments (as stated in the Guile documentation).
---

diff --git a/scm/lily.scm b/scm/lily.scm
index c2b4fa7f2b..cf6c8b07c8 100644
--- a/scm/lily.scm
+++ b/scm/lily.scm
@@ -36,7 +36,7 @@
     (debug-enable 'debug)
     (begin
       (debug-enable 'backtrace)
-      (debug-enable 'show-file-name)))
+      (debug-set! show-file-name #t)))
 
 (define-public PLATFORM
   (string->symbol