Issue 3009: Make \revert work again as context modification

diff --git a/lily/parser.yy b/lily/parser.yy
index 4a329084c0f16d32ec8eee7c0c10e17c8489e1b3..d6a7beac926c46f61f0d037a52c3663bf3ff3071 100644 (file)
--- a/lily/parser.yy
+++ b/lily/parser.yy
@@ -2004,9 +2004,7 @@ property_operation:
                }
        }
        | REVERT revert_arg {
-               $$ = scm_list_3 (ly_symbol2scm ("pop"),
-                                scm_car ($2),
-                                scm_cdr ($2));
+               $$ = scm_cons (ly_symbol2scm ("pop"), $2);
        }
        ;