# HG changeset patch
# User jwe
# Date 1066276890 0
# Node ID 5c6f7daf1e3f3a453d34ed5da3a5833b17b2ad1e
# Parent  f855e276044c3c9195705d065fead3c048f41e56
[project @ 2003-10-16 04:01:30 by jwe]

diff --git a/scripts/miscellaneous/horzcat.m b/scripts/miscellaneous/horzcat.m
--- a/scripts/miscellaneous/horzcat.m
+++ b/scripts/miscellaneous/horzcat.m
@@ -18,16 +18,18 @@
 ## 02111-1307, USA.
 
 ## -*- texinfo -*-
-## @deftypefn {Function File} {@var{c} =} horzcat (@var{a}, @var{b})
-## Equivalent to @code{c = [a, b]}.
+## @deftypefn {Function File} {@var{c} =} horzcat (@var{a}, @var{b}, @dots{})
+## Equivalent to @code{c = [a, b, ...]}.
 ## @end deftypefn
 
-function c = horzcat (a, b)
+function c = horzcat (varargin)
+
+  ## This is just a quick fix for compatibility.
 
-  if (nargin == 2)
-    c = [a, b];
+  if (nargin > 1)
+    c = [ varargin{:} ];
   else
-    usage ("horzcat (a, b)");
+    usage ("horzcat (a, b, ...)");
   endif
 
 endfunction
diff --git a/scripts/miscellaneous/vertcat.m b/scripts/miscellaneous/vertcat.m
--- a/scripts/miscellaneous/vertcat.m
+++ b/scripts/miscellaneous/vertcat.m
@@ -18,16 +18,21 @@
 ## 02111-1307, USA.
 
 ## -*- texinfo -*-
-## @deftypefn {Function File} {@var{c} =} vertcat (@var{a}, @var{b})
-## Equivalent to @code{c = [a; b]}.
+## @deftypefn {Function File} {@var{c} =} vertcat (@var{a}, @var{b}, @dots{})
+## Equivalent to @code{c = [a; b; ...]}.
 ## @end deftypefn
 
-function c = vertcat (a, b)
+function c = vertcat (varargin)
+
+  ## This is just a quick fix for compatibility.
 
-  if (nargin == 2)
-    c = [a, b];
+  if (nargin > 1)
+    for i = 1:nargin
+      varargin{i} = varargin{i}.';
+    endfor
+    c = [ varargin{:} ].';
   else
-    usage ("vertcat (a, b)");
+    usage ("vertcat (a, b, ...)");
   endif
 
 endfunction