# HG changeset patch
# User jwe
# Date 796026014 0
# Node ID 0a9c94ee69e8ee30f9078a489ccd7df57e97c836
# Parent  f070efd56c3d63b6cb176bc14c1d8f3fcca73b36
[project @ 1995-03-24 06:20:14 by jwe]

diff -r f070efd56c3d -r 0a9c94ee69e8 src/load-save.cc
--- a/src/load-save.cc	Thu Mar 23 21:45:33 1995 +0000
+++ b/src/load-save.cc	Fri Mar 24 06:20:14 1995 +0000
@@ -1943,19 +1943,22 @@
       file.seekg (0, ios::beg);
 
       FOUR_BYTE_INT mopt, nr, nc, imag, len;
-      int swap;
-
-      if (read_mat_file_header (file, swap, mopt, nr, nc, imag, len, 1) == 0)
+
+      int err = read_mat_file_header (file, swap, mopt, nr, nc, imag, len, 1);
+
+      if (! err)
 	retval = LS_MAT_BINARY;
       else
 	{
 	  file.seekg (0, ios::beg);
 
 	  char *tmp = extract_keyword (file, "name");
+
 	  if (tmp)
-	    retval = LS_ASCII;
-
-	  delete [] tmp;
+	    {
+	      retval = LS_ASCII;
+	      delete [] tmp;
+	    }
 	}
     }