diff scripts/io/dlmwrite.m @ 10940:306e40d773a9

don't fclose stream in dlmwrite
author Jaroslav Hajek <highegg@gmail.com>
date Wed, 01 Sep 2010 13:48:10 +0200
parents 1d761a30c3fb
children c9b0a75b02e8
line wrap: on
line diff
--- a/scripts/io/dlmwrite.m
+++ b/scripts/io/dlmwrite.m
@@ -192,7 +192,9 @@
     else
       fprintf (fid, template, a.');
     endif
-    fclose (fid);
+    if (! isscalar (file))
+      fclose (fid);
+    endif
   endif
 endfunction