return mlt_properties_init( &this->parent, this );
}
-/** Return the properties object.
-*/
-
-mlt_properties mlt_service_properties( mlt_service this )
-{
- return &this->parent;
-}
-
/** Connect a producer service.
Returns: > 0 warning, == 0 success, < 0 serious error
1 = this service does not accept input
base->out = that;
}
+
+/** Get the first connected producer service.
+*/
+
+mlt_service mlt_service_get_producer( mlt_service this )
+{
+ mlt_service producer = NULL;
+
+ // Get the service base
+ mlt_service_base *base = this->private;
+
+ if ( base->in != NULL )
+ producer = base->in[ 0 ];
+
+ return producer;
+}
+
+
/** Get the service state.
*/