X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=lily%2Fstencil-expression.cc;h=ea9c08871979a16620974b071798210c0b6c63b3;hb=3dc994a95c8adc1db1d8064c762719da6ac78385;hp=ae9127cfbbc851f7563cfe880f7bed8b7083e091;hpb=75eebcb49e52d296b1da3e1074e0825d2c780db4;p=lilypond.git

diff --git a/lily/stencil-expression.cc b/lily/stencil-expression.cc
index ae9127cfbb..ea9c088719 100644
--- a/lily/stencil-expression.cc
+++ b/lily/stencil-expression.cc
@@ -4,7 +4,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2005--2006 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