unsmob_pitch -> Pitch::unsmob and related

[lilypond.git] / lily / slur-proto-engraver.cc

diff --git a/lily/slur-proto-engraver.cc b/lily/slur-proto-engraver.cc
index f2e345691354d291a77c0f9562f0bfaf04b889e0..b90d381412707edc5f5509e58bfdfa30e5341077 100644 (file)
--- a/lily/slur-proto-engraver.cc
+++ b/lily/slur-proto-engraver.cc
@@ -1,7 +1,7 @@
 /*
   This file is part of LilyPond, the GNU music typesetter.
 
-  Copyright (C) 2013 Mike Solomon <mike@mikesolomon.org>
+  Copyright (C) 2013--2014 Mike Solomon <mike@mikesolomon.org>
 
   LilyPond is free software: you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
@@ -125,7 +125,7 @@ Slur_proto_engraver::finalize ()
 void
 Slur_proto_engraver::create_slur (const string &spanner_id, Stream_event *ev_cause, Grob *g_cause, Direction dir, bool left_broken)
 {
-  Grob *ccc = unsmob_grob (get_property ("currentCommandColumn"));
+  Grob *ccc = Grob::unsmob (get_property ("currentCommandColumn"));
   SCM cause = ev_cause ? ev_cause->self_scm () : g_cause->self_scm ();
   Spanner *slur = make_spanner (grob_name_, cause);
   slur->set_property ("spanner-id", ly_string2scm (spanner_id));
@@ -266,7 +266,7 @@ Slur_proto_engraver::set_melisma (bool)
 void
 Slur_proto_engraver::stop_translation_timestep ()
 {
-  if (Grob *g = unsmob_grob (get_property ("currentCommandColumn")))
+  if (Grob *g = Grob::unsmob (get_property ("currentCommandColumn")))
     {
       for (vsize i = 0; i < end_slurs_.size (); i++)
         Slur::add_extra_encompass (end_slurs_[i], g);
@@ -280,7 +280,7 @@ Slur_proto_engraver::stop_translation_timestep ()
     {
       Spanner *s = dynamic_cast<Spanner *> (end_slurs_[i]);
       if (!s->get_bound (RIGHT))
-        s->set_bound (RIGHT, unsmob_grob (get_property ("currentMusicalColumn")));
+        s->set_bound (RIGHT, Grob::unsmob (get_property ("currentMusicalColumn")));
       announce_end_grob (s, SCM_EOL);
     }