/*
This file is part of LilyPond, the GNU music typesetter.
- Copyright (C) 1998--2014 Jan Nieuwenhuizen <janneke@gnu.org>
+ Copyright (C) 1998--2015 Jan Nieuwenhuizen <janneke@gnu.org>
Han-Wen Nienhuys <hanwen@xs4all.nl>
LilyPond is free software: you can redistribute it and/or modify
#include "context.hh"
#include "context-def.hh"
#include "dispatcher.hh"
+#include "grob-properties.hh"
LY_DEFINE (ly_context_current_moment,
"ly:context-current-moment",
LY_ASSERT_SMOB (Context, context, 1);
LY_ASSERT_TYPE (ly_is_symbol, name, 2);
- return updated_grob_properties (tr, name);
+ return Grob_property_info (tr, name).updated ();
}
LY_DEFINE (ly_context_pushpop_property, "ly:context-pushpop-property",
LY_ASSERT_TYPE (ly_is_symbol, sym, 2);
Context *t = Context::unsmob (context);
- SCM result = t->internal_get_property (sym);
+ SCM result = t->get_property (sym);
return def != SCM_UNDEFINED && scm_is_null (result) ? def : result;
}