Run `make grand-replace'.

[lilypond.git] / lily / stencil-expression.cc

diff --git a/lily/stencil-expression.cc b/lily/stencil-expression.cc
index 072952ac59291a12cf33c0425ff79a03e219536a..ea9c08871979a16620974b071798210c0b6c63b3 100644 (file)
--- a/lily/stencil-expression.cc
+++ b/lily/stencil-expression.cc
@@ -4,7 +4,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  (c) 2005--2008 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
 #include "stencil.hh"
@@ -17,7 +17,7 @@ void register_stencil_head (SCM symbol)
     heads = scm_permanent_object (scm_cons (SCM_EOL, SCM_EOL));
   
   scm_set_object_property_x (symbol, ly_symbol2scm ("stencil-head?"), SCM_BOOL_T);
-  scm_set_cdr_x (heads,  scm_cons (symbol, heads));
+  scm_set_cdr_x (heads,  scm_cons (symbol, scm_cdr (heads)));
 }
 
 bool