diff --git a/matlab/swz/swz_write_mhm_input.m b/matlab/swz/swz_write_mhm_input.m
index 3894ad61c..e455f810d 100644
--- a/matlab/swz/swz_write_mhm_input.m
+++ b/matlab/swz/swz_write_mhm_input.m
@@ -36,4 +36,5 @@ function swz_write_mhm_input(fname,options_ms)
     fprintf(fh,'//== scale values for Dirichlet distribution ==//\n');
     fprintf(fh,'3\n\n');
     fprintf(fh,'%f ',options_ms.dirichlet_scale);
-    fprintf(fh,'\n');
\ No newline at end of file
+    fprintf(fh,'\n');
+    fclose(fh);
\ No newline at end of file