diff doc/interpreter/sparseimages.m @ 6126:c0011bf8f815

[project @ 2006-10-31 20:08:30 by jwe]
author jwe
date Tue, 31 Oct 2006 20:10:39 +0000
parents 2bcb2fa24bbf
children 830235f4984f
line wrap: on
line diff
--- a/doc/interpreter/sparseimages.m	Sun Oct 29 17:05:53 2006 +0000
+++ b/doc/interpreter/sparseimages.m	Tue Oct 31 20:10:39 2006 +0000
@@ -1,22 +1,18 @@
-function sparseimages(nm,typ)
+function sparseimages (nm, typ)
   if (! isempty (findstr (octave_config_info ("DEFS"), "HAVE_COLAMD"))
       && ! isempty (findstr (octave_config_info ("DEFS"), "HAVE_CHOLMOD"))
       && ! isempty (findstr (octave_config_info ("DEFS"), "HAVE_UMFPACK")))
-  if (strcmp(typ,"txt"))
-    txtimages (nm, 15, typ);
-  else
-    if (strcmp (nm, "gplot"))
-      gplotimages ("gplot", typ);
-    elseif (strcmp (nm, "grid"))
-      femimages ("grid", typ);
+    if (strcmp(typ,"txt"))
+      txtimages (nm, 15, typ);
     else
-      otherimages (nm, 200, typ);
+      if (strcmp (nm, "gplot"))
+	gplotimages ("gplot", typ);
+      elseif (strcmp (nm, "grid"))
+	femimages ("grid", typ);
+      else
+	otherimages (nm, 200, typ);
+      endif
     endif
-  endif
-  ## Kluge to give gnuplot enough time to process last figure before we
-  ## exit.  Otherwise, Octave will delete the temporary data files when
-  ## it exits and gnuplot will fail...
-  sleep (1);
   else ## There is no sparse matrix implementation available because
        ## of missing libraries, plot sombreros instead
     sombreroimage (nm, typ);