From be6abce398a82e2387aa6423993f039db6d2b9bf Mon Sep 17 00:00:00 2001
From: Robin Gareus <robin@gareus.org>
Date: Fri, 18 Aug 2017 22:00:24 +0200
Subject: Add Lua binding to un/assign VCAs

---
 libs/ardour/luabindings.cc | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'libs/ardour/luabindings.cc')

diff --git a/libs/ardour/luabindings.cc b/libs/ardour/luabindings.cc
index 04275991b7..01aca89015 100644
--- a/libs/ardour/luabindings.cc
+++ b/libs/ardour/luabindings.cc
@@ -196,6 +196,7 @@ CLASSKEYS(ARDOUR::PresentationInfo);
 CLASSKEYS(ARDOUR::RCConfiguration);
 CLASSKEYS(ARDOUR::Session);
 CLASSKEYS(ARDOUR::SessionConfiguration);
+CLASSKEYS(ARDOUR::Slavable);
 CLASSKEYS(ARDOUR::Source);
 CLASSKEYS(ARDOUR::VCA);
 CLASSKEYS(ARDOUR::VCAManager);
@@ -958,6 +959,11 @@ LuaBindings::common (lua_State* L)
 		.addConst ("max_order", ARDOUR::PresentationInfo::max_order)
 		.endClass ()
 
+		.beginWSPtrClass <Slavable> ("Slavable")
+		.addFunction ("assign", &Slavable::assign)
+		.addFunction ("unassign", &Slavable::unassign)
+		.endClass ()
+
 		.deriveWSPtrClass <Stripable, SessionObject> ("Stripable")
 		.addCast<Route> ("to_route")
 		.addCast<VCA> ("to_vca")
@@ -1019,6 +1025,7 @@ LuaBindings::common (lua_State* L)
 		.deriveWSPtrClass <Route, Stripable> ("Route")
 		.addCast<Track> ("to_track")
 		.addCast<Automatable> ("to_automatable")
+		.addCast<Slavable> ("to_slavable")
 		.addFunction ("set_name", &Route::set_name)
 		.addFunction ("comment", &Route::comment)
 		.addFunction ("active", &Route::active)
@@ -1250,6 +1257,7 @@ LuaBindings::common (lua_State* L)
 		.endClass ()
 
 		.deriveWSPtrClass <Automatable, Evoral::ControlSet> ("Automatable")
+		.addCast<Slavable> ("to_slavable")
 		.addFunction ("automation_control", (boost::shared_ptr<AutomationControl>(Automatable::*)(const Evoral::Parameter&, bool))&Automatable::automation_control)
 		//.addFunction ("what_can_be_automated", &Automatable::what_can_be_automated)
 		.endClass ()
@@ -2028,6 +2036,7 @@ LuaBindings::common (lua_State* L)
 		.addFunction ("create_vca", &VCAManager::create_vca)
 		.addFunction ("remove_vca", &VCAManager::remove_vca)
 		.addFunction ("vca_by_number", &VCAManager::vca_by_number)
+		.addFunction ("vca_by_name", &VCAManager::vca_by_name)
 		.addFunction ("vcas", &VCAManager::vcas)
 		.addFunction ("n_vcas", &VCAManager::n_vcas)
 		.endClass()
-- 
cgit v1.2.3