fix file handle leak (coverity-709383)

diff --git a/src/modules/core/producer_melt.c b/src/modules/core/producer_melt.c
index 47307f643b2142a847e4f97f0867b84870f5f4fc..fc4812abf96e22b2fcef9cb6846c6e9023cf0088 100644 (file)
--- a/src/modules/core/producer_melt.c
+++ b/src/modules/core/producer_melt.c
@@ -41,6 +41,7 @@ mlt_producer producer_melt_file_init( mlt_profile profile, mlt_service_type type
                        if ( strcmp( temp, "" ) )
                                args[ count ++ ] = strdup( temp );
                }
+               fclose( input );
        }
 
        mlt_producer result = producer_melt_init( profile, type, id, args );