Mercurial > hg > octave-terminal
changeset 12536:7d9dbe4c803b
Fix bug #32873, ifftshift fails.
author | Rik <octave@nomad.inbox5.com> |
---|---|
date | Mon, 21 Mar 2011 14:26:09 -0700 |
parents | 1eb430d9a1b9 |
children | 015bfdc88092 |
files | scripts/ChangeLog scripts/signal/ifftshift.m |
diffstat | 2 files changed, 7 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/ChangeLog +++ b/scripts/ChangeLog @@ -1,3 +1,7 @@ +2010-03-21 Rik <octave@nomad.inbox5.com> + + * signal/ifftshift.m: Fix bug #32873, ifftshift fails. + 2010-03-19 Rik <octave@nomad.inbox5.com> * general/module.mk, statistics/base/module.mk: Move runlength.m
--- a/scripts/signal/ifftshift.m +++ b/scripts/signal/ifftshift.m @@ -53,9 +53,9 @@ retval = x(idx{:}); else if (isvector (x)) - x = length (x); - xx = floor (x/2); - retval = x([xx+1:x, 1:xx]); + xl = length (x); + xx = floor (xl/2); + retval = x([xx+1:xl, 1:xx]); elseif (ismatrix (x)) nd = ndims (x); sz = size (x);