From: fred <fred>
Date: Wed, 27 Mar 2002 00:34:59 +0000 (+0000)
Subject: lilypond-1.3.119
X-Git-Tag: release/1.5.59~1021
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=58bcb83d84744eedb66b2d8db7d6f2ff99d4806d;p=lilypond.git

lilypond-1.3.119
---

diff --git a/lily/parser.yy b/lily/parser.yy
index 2cf1bf94a3..7366cea832 100644
--- a/lily/parser.yy
+++ b/lily/parser.yy
@@ -532,7 +532,7 @@ score_body:
 		$$->set_spot (THIS->here_input ());
 	}
 	| score_body lilypond_header 	{
-		scm_unprotect_object ( $1->self_scm ()); 
+		scm_unprotect_object ($2->self_scm ()); 
 		$$->header_p_ = $2;
 	}
 	| score_body output_def {
@@ -629,8 +629,6 @@ Music_list: /* empty */ {
 		SCM s = $$;
 		SCM c = gh_cons ($2->self_scm (), SCM_EOL);
 		scm_unprotect_object ($2->self_scm ()); /* UGH */
-
-	
 		if (gh_pair_p (gh_cdr (s)))
 			gh_set_cdr_x (gh_cdr (s), c); /* append */
 		else