From: Neil Puttock <n.puttock@gmail.com>
Date: Sun, 28 Dec 2008 12:03:07 +0000 (+0000)
Subject: ly:default-scale: don't return SCM_BOOL_F if default_global_scale exists.
X-Git-Tag: release/2.12.1-1~24
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=51e71f6db16dff6723d8ce546772a542225ded82;p=lilypond.git

ly:default-scale: don't return SCM_BOOL_F if default_global_scale exists.
---

diff --git a/lily/scale.cc b/lily/scale.cc
index 23490c8890..99cd6d91db 100644
--- a/lily/scale.cc
+++ b/lily/scale.cc
@@ -57,8 +57,8 @@ LY_DEFINE (ly_default_scale, "ly:default-scale",
 	   "Get the global default scale.")
 {
   return default_global_scale
-    ? SCM_BOOL_F
-    : default_global_scale->self_scm ();
+    ? default_global_scale->self_scm ()
+    : SCM_BOOL_F;
 }