From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Sun, 26 Nov 2006 17:33:28 +0000 (+0100)
Subject: resolve
X-Git-Tag: release/2.11.0-1~16
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=fee3b506770ea5fa8e3ec6078795d1ede16244ec;p=lilypond.git

resolve
---

diff --git a/scm/lily-library.scm b/scm/lily-library.scm
index e8327e4bed..3575e13264 100644
--- a/scm/lily-library.scm
+++ b/scm/lily-library.scm
@@ -253,6 +253,8 @@ found."
      (else
       (helper (cdr todo) (1+ k)))))
 
+  (helper lst 0))
+
 (define-public (count-list lst)
   "Given lst (E1 E2 .. ) return ((E1 . 1) (E2 . 2) ... )  "
   (define (helper l acc count)