X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fobject-key.cc;h=50e42027efd8ddea4048c23b5c1c113ef9885a7d;hb=63179d1f16581b4993455c726cab4873c7f0dbc0;hp=134ff7fb232a3b757e0bc34b3306574bcf59023d;hpb=58bcc84c9480dae1b21bc24d8396b91fe19e0131;p=lilypond.git

diff --git a/lily/object-key.cc b/lily/object-key.cc
index 134ff7fb23..50e42027ef 100644
--- a/lily/object-key.cc
+++ b/lily/object-key.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 "lilypond-key.hh"
@@ -20,7 +20,6 @@ Object_key::mark_smob (SCM key)
 void
 Object_key::derived_mark () const
 {
-
 }
 
 Object_key::~Object_key ()
@@ -138,7 +137,7 @@ Copied_key::get_type () const
 int
 Copied_key::do_compare (Object_key const *key) const
 {
-  Copied_key const *other = dynamic_cast < Copied_key const *> (key);
+  Copied_key const *other = dynamic_cast<Copied_key const *> (key);
 
   int c = original_->compare (other->original_);
   if (c)
@@ -156,7 +155,9 @@ Copied_key::derived_mark () const
 SCM
 Copied_key::as_scheme () const
 {
-  return scm_list_2 (original_ ? original_->self_scm () : SCM_BOOL_F, scm_from_int (copy_count_));
+  return scm_list_2 (original_
+		     ? original_->self_scm ()
+		     : SCM_BOOL_F, scm_from_int (copy_count_));
 }
 
 Object_key *
@@ -165,3 +166,4 @@ Copied_key::from_scheme (SCM a)
   return new Copied_key (unsmob_key (scm_car (a)),
 			 scm_to_int (scm_list_ref (a, scm_from_int (1))));
 }
+