diff scripts/miscellaneous/gzip.m @ 12499:a3019189ac51

Improve file archiving functions (gzip, bzip2, zip, unpack)
author Rik <octave@nomad.inbox5.com>
date Thu, 03 Mar 2011 11:59:05 -0800
parents c792872f8942
children 8f2056646dba
line wrap: on
line diff
--- a/scripts/miscellaneous/gzip.m	Thu Mar 03 09:46:00 2011 -0800
+++ b/scripts/miscellaneous/gzip.m	Thu Mar 03 11:59:05 2011 -0800
@@ -28,21 +28,22 @@
 ## @end deftypefn
 
 function entries = gzip (varargin)
-  if (nargin == 1 || nargin == 2) && (nargout <= 1)
-    if nargout == 0
-      __xzip__ ("gzip", "gz", "gzip -r %s", varargin{:});
-    else
-      entries = __xzip__ ("gzip", "gz", "gzip -r %s", varargin{:});
-    endif
-  else
+  if (nargin != 1 && nargin != 2) || (nargout > 1)
     print_usage ();
   endif
+     
+  if (nargout == 0)
+    __xzip__ ("gzip", "gz", "gzip -r %s", varargin{:});
+  else
+    entries = __xzip__ ("gzip", "gz", "gzip -r %s", varargin{:});
+  endif
+
 endfunction
 
 %!error <Invalid call to gzip.  Correct usage is> gzip("1", "2", "3");
 %!error <Invalid call to gzip.  Correct usage is> gzip();
 %!error <output directory does not exist> gzip("1", tmpnam);
-%!error <expecting FILES to be a character array> gzip(1);
+%!error <FILES must be a character array or cellstr> gzip(1);
 %!xtest
 %!  # test gzip together with gunzip
 %!  unwind_protect