release: 1.5.24

[lilypond.git] / scm / lily.scm

diff --git a/scm/lily.scm b/scm/lily.scm
index 0fd88bb740c7abd5efd5b6b346fd973b81512ed8..0025dacb7ce4e444614284896fb4e220c8a54a51 100644 (file)
--- a/scm/lily.scm
+++ b/scm/lily.scm
@@ -63,7 +63,7 @@
 
 (define (sign x)
   (if (= x 0)
-      1
+      0
       (if (< x 0) -1 1)))
 
 (define (write-me n x)