Mercurial > hg > octave-lojdl

changeset 7130:5eeb46c784d7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-11-08 15:27:23 by jwe]
author jwe
date Thu, 08 Nov 2007 15:28:41 +0000
parents 363ffc8a5c80
children a184bc985c37
files scripts/ChangeLog scripts/plot/quiver.m
diffstat 2 files changed, 6 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,3 +1,7 @@
+2007-11-08  David Bateman  <dbateman@free.fr>
+
+	* plot/quiver.m: Fix arrowheads.
+
 2007-11-07  Ben Abbott  <bpabbott@mac.com>
 
 	* set/ismember.m: Call cell_ismember to handle cellstr args.
--- a/scripts/plot/quiver.m
+++ b/scripts/plot/quiver.m
@@ -179,8 +179,8 @@
     ytmp = y + v(:) .* (1 - arrowsize);
     xarrw1 = xtmp + (y - yend) * arrowsize / 3;
     xarrw2 = xtmp - (y - yend) * arrowsize / 3;
-    yarrw1 = ytmp + (x - xend) * arrowsize / 3;
-    yarrw2 = ytmp - (x - xend) * arrowsize / 3;
+    yarrw1 = ytmp - (x - xend) * arrowsize / 3;
+    yarrw2 = ytmp + (x - xend) * arrowsize / 3;
 
     if (have_line_spec)
       if (isfield (linespec, "marker") &&