# HG changeset patch
# User jwe
# Date 1163547148 0
# Node ID ea26b8fda4d71d7fa1282ce7928ae7d2e7f659a7
# Parent  d90b16110095a1e080ff1987729cdc9c2f296df2
[project @ 2006-11-14 23:32:28 by jwe]

diff -r d90b16110095 -r ea26b8fda4d7 scripts/image/image_viewer.m
--- a/scripts/image/image_viewer.m	Tue Nov 14 21:08:01 2006 +0000
+++ b/scripts/image/image_viewer.m	Tue Nov 14 23:32:28 2006 +0000
@@ -82,28 +82,41 @@
     print_usage ();
   endif
 
-  ocmd = view_cmd;
-  ofcn = view_fcn;
-  ozoom = view_zoom;
-
-  if (nargin > 0)
-    view_cmd = cmd;
+  if (nargout > 0)
+    ocmd = view_cmd;
+    ofcn = view_fcn;
+    ozoom = view_zoom;
   endif
 
-  if (nargin > 1)
-    if (isa (fcn, "function_handle"))
-      view_fcn = fcn;
-    else
-      error ("image_viewer: expecting second argument to be a function handle");
+  if (nargin > 0)
+
+    if (nargin < 3)
+      zoom = 1;
+      if (nargin < 2)
+	fcn = [];
+      endif
     endif
-  endif
+
+    view_cmd = cmd;
+    view_fcn = fcn;
+    view_zoom = zoom;
 
-  if (nargin > 2)
-    if (isnumeric (zoom) && isscalar (zoom) && isreal (zoom))
-      view_zoom = zoom;
-    else
-      error ("image_viewer: expecting third argument to be a real scalar");
+    if (nargin > 1)
+      if (isa (fcn, "function_handle"))
+	view_fcn = fcn;
+      else
+	error ("image_viewer: expecting second argument to be a function handle");
+      endif
     endif
+
+    if (nargin > 2)
+      if (isnumeric (zoom) && isscalar (zoom) && isreal (zoom))
+	view_zoom = zoom;
+      else
+	error ("image_viewer: expecting third argument to be a real scalar");
+      endif
+    endif
+
   endif
 
 endfunction