* The grand 2005-2006 replace.

[lilypond.git] / lily / align-interface.cc

diff --git a/lily/align-interface.cc b/lily/align-interface.cc
index 034f6d58d57f069be6857fcd23517672ddf17efa..dfccf028858eb5ded3eb133a73a64ccdc9e9a856 100644 (file)
--- a/lily/align-interface.cc
+++ b/lily/align-interface.cc
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2000--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 2000--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
 #include "align-interface.hh"
@@ -263,8 +263,11 @@ Align_interface::axis (Grob *me)
 void
 Align_interface::add_element (Grob *me, Grob *element)
 {
-  element->add_offset_callback (Grob::same_axis_parent_positioning_proc,
-                               Align_interface::axis (me));
+  Axis a = Align_interface::axis (me);
+  SCM sym = axis_offset_symbol (a);
+  SCM proc = axis_parent_positioning (a);
+    
+  element->internal_set_property (sym, proc);
   Axis_group_interface::add_element (me, element);
 }