Fix #122.

[lilypond.git] / lily / object-key-dumper.cc

diff --git a/lily/object-key-dumper.cc b/lily/object-key-dumper.cc
index c1ba935b44db9eb145687ceb5afe0e3e0b169dfd..204097f4b4364838b89cdfe13bd4c970ebf98b89 100644 (file)
--- a/lily/object-key-dumper.cc
+++ b/lily/object-key-dumper.cc
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2004--2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  (c) 2004--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
 #include "object-key-dumper.hh"
@@ -57,11 +57,9 @@ Object_key_dumper::serialize_key (Object_key const *key)
       if (Object_key const *sub_key = unsmob_key (scm_car (s)))
        scm_set_car_x (s, dump_key (sub_key));
       else if (Moment *mom = unsmob_moment (scm_car (s)))
-       {
-         scm_set_car_x (s,
-                        scm_list_2 (ly_symbol2scm ("unquote"),
-                                    mom->as_scheme ()));
-       }
+       scm_set_car_x (s,
+                      scm_list_2 (ly_symbol2scm ("unquote"),
+                                  mom->as_scheme ()));
     }
 
   file_contents_ = scm_cons (scm_list_3 (ly_symbol2scm ("define-key"),