Mercurial > forge

changeset 5703:e171ffc7b843 octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix option handling in parcellfun
author highegg
date Wed, 03 Jun 2009 08:00:07 +0000
parents 26e48505a398
children 15b7cc75ac99
files main/general/inst/parcellfun.m
diffstat 1 files changed, 15 insertions(+), 13 deletions(-) [+]
line wrap: on
line diff
--- a/main/general/inst/parcellfun.m	Tue Jun 02 10:05:07 2009 +0000
+++ b/main/general/inst/parcellfun.m	Wed Jun 03 08:00:07 2009 +0000
@@ -63,19 +63,21 @@
   nargs = length (varargin);
 
   ## parse options
-  do
-    if (strcmp (args{nargs-1}, "UniformOutput"))
-      uniform_output = args{nargs};
-      nargs -= 2;
-      continue;
-    endif
-    if (strcmp (args{nargs-1}, "ErrorHandler"))
-      error_handler = args{nargs};
-      nargs -= 2;
-      continue;
-    endif
-    break;
-  until (nargs < 2);
+  if (nargs > 1)
+    do
+      if (strcmp (args{nargs-1}, "UniformOutput"))
+        uniform_output = args{nargs};
+        nargs -= 2;
+        continue;
+      endif
+      if (strcmp (args{nargs-1}, "ErrorHandler"))
+        error_handler = args{nargs};
+        nargs -= 2;
+        continue;
+      endif
+      break;
+    until (nargs < 2);
+  endif
 
   args = args(1:nargs);