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

diff --git a/lily/stencil-expression.cc b/lily/stencil-expression.cc
index ae9127cfbb..64ad13d95f 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--2007 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