# HG changeset patch
# User Stefan Mahr <dac922@gmx.de>
# Date 1400104703 -7200
# Node ID 4ca40b289b2c2b3be836f4c7b766dea4cab74dd3
# Parent  e5ab507687ee16e5479230f34d38e5e6d079bb04
isaxes.m: Fix bug where some inputs do not show up in outputs (bug #42362).

* isaxes.m: Keep input vector size. Test added.

diff -r e5ab507687ee -r 4ca40b289b2c scripts/plot/util/isaxes.m
--- a/scripts/plot/util/isaxes.m	Thu May 08 10:59:21 2014 -0700
+++ b/scripts/plot/util/isaxes.m	Wed May 14 23:58:23 2014 +0200
@@ -35,10 +35,10 @@
   endif
 
   hlist = ishandle (h);
+  retval = hlist;
+
   if (any (hlist))
     retval(hlist) = strcmp (get (h(hlist), "type"), "axes");
-  else
-    retval = hlist;
   endif
 
 endfunction
@@ -54,3 +54,11 @@
 %!   close (hf);
 %! end_unwind_protect
 
+%!test
+%! hf = figure ("visible", "off");
+%! unwind_protect
+%!   hax = axes ();
+%!   assert (isaxes ([hax NaN]), [true false]);
+%! unwind_protect_cleanup
+%!   close (hf);
+%! end_unwind_protect