From fd7e58a2d700ac0bd926268dece7afcb161bd9fa Mon Sep 17 00:00:00 2001
From: David Kastrup <dak@gnu.org>
Date: Tue, 6 Oct 2015 15:24:14 +0200
Subject: [PATCH] Issue 4630/1: Add location info override to some music
 expressions

This gives location information for #{ ... #} to music function callers
instead of the music function body.
---
 lily/parser.yy | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lily/parser.yy b/lily/parser.yy
index a166aee8e5..ad10401441 100644
--- a/lily/parser.yy
+++ b/lily/parser.yy
@@ -2811,8 +2811,8 @@ note_chord_element:
 		  unsmob<Music> (scm_car (s))->set_property ("duration", dur);
 		es = ly_append2 (es, postevs);
 
-		m-> set_property ("elements", es);
-		m->set_spot (@$);
+		m->set_property ("elements", es);
+		m->set_spot (parser->lexer_->override_input (@$));
 		$$ = m->self_scm ();
 	} %prec ':'
 	;
@@ -2919,7 +2919,7 @@ post_events:
 					$$ = scm_cons (scm_car (p), $$);
 				}
 			} else {
-				m->set_spot (@2);
+				m->set_spot (parser->lexer_->override_input (@2));
 				$$ = scm_cons ($2, $$);
 			}
 		}
-- 
2.39.2