# HG changeset patch
# User Jaroslav Hajek <highegg@gmail.com>
# Date 1259242795 -3600
# Node ID 050b8c0e1531191668a418300c3fba2c8347a2e4
# Parent  8166d596247ea3dffa8fa82e021be6e6c0d0ed01
correct previous patch

diff -r 8166d596247e -r 050b8c0e1531 scripts/linear-algebra/dot.m
--- a/scripts/linear-algebra/dot.m	Thu Nov 26 14:08:48 2009 +0100
+++ b/scripts/linear-algebra/dot.m	Thu Nov 26 14:39:55 2009 +0100
@@ -43,12 +43,12 @@
     if (! size_equal (x, y))
       error ("dot: sizes of arguments must match");
     endif
-    z = sum(x .* conj (y));
+    z = sum(conj (x) .* y);
   else
     if (! size_equal (x, y))
       error ("dot: sizes of arguments must match");
     endif
-    z = sum(x .* conj (y), dim);
+    z = sum(conj (x) .* y, dim);
   endif
 
 endfunction