Data feed and show filters

[melted] / src / modules / core / producer_noise.c

diff --git a/src/modules/core/producer_noise.c b/src/modules/core/producer_noise.c
index f4c63a4..54d0474 100644 (file)
--- a/src/modules/core/producer_noise.c
+++ b/src/modules/core/producer_noise.c
@@ -60,7 +60,7 @@ mlt_producer producer_noise_init( void *arg )
 
                // Callback registration
                this->get_frame = producer_get_frame;
-               this->close = producer_close;
+               this->close = ( mlt_destructor )producer_close;
        }
 
        return this;
@@ -149,8 +149,14 @@ static int producer_get_frame( mlt_producer this, mlt_frame_ptr frame, int index
                // Obtain properties of frame
                mlt_properties properties = mlt_frame_properties( *frame );
 
+               // Obtain properties of producer
+               mlt_properties producer_props = mlt_producer_properties( this );
+
+               // Determine if we're producing PAL or NTSC
+               int is_pal = mlt_properties_get_double( producer_props, "fps" ) == 25.0;
+
                // Aspect ratio is 1?
-               mlt_properties_set_double( properties, "aspect_ratio", 1.0 );
+               mlt_properties_set_double( properties, "aspect_ratio", is_pal ? 128.0/117.0 : 72.0/79.0 );
 
                // Set producer-specific frame properties
                mlt_properties_set_int( properties, "progressive", 1 );