Thinko.

diff --git a/lily/nested-property.cc b/lily/nested-property.cc
index c59671814439db7da1fa7fadfdcc9230a456e646..fb62c7d80ad08196313ad8c2a4d6509369037524 100644 (file)
--- a/lily/nested-property.cc
+++ b/lily/nested-property.cc
@@ -70,7 +70,7 @@ nested_property_revert_alist (SCM alist, SCM prop_path)
   for (SCM s = alist; scm_is_pair (s); s = scm_cdr (s))
     {
       SCM sub_sym = scm_caar (s);
-      SCM old_val = scm_cadr (s);
+      SCM old_val = scm_cdar (s);
 
       if (sub_sym == wanted_sym)
        {