# HG changeset patch
# User Ismael Núñez-Riboni <address@hidden>
# Date 1331567003 14400
# Branch stable
# Node ID f74e96c77a5ea2f7f727127e3af9d324619fc0d4
# Parent  b0e70a71647b671ebcfa7a79af1ae6d3c0f52065
cov.m: Produce an output matrix for Matlab compatibility

diff --git a/scripts/statistics/base/cov.m b/scripts/statistics/base/cov.m
--- a/scripts/statistics/base/cov.m
+++ b/scripts/statistics/base/cov.m
@@ -105,7 +105,10 @@
     endif
     x = center (x, 1);
     y = center (y, 1);
-    c = conj (x' * y / (n - 1 + opt));
+
+    x = [x,y];
+
+    c = conj (x' * x / (n - 1 + opt));
   endif
 
 endfunction