# HG changeset patch
# User Rik <octave@nomad.inbox5.com>
# Date 1300742769 25200
# Node ID 7d9dbe4c803bf74e240e2f2ca03f48d2436d7734
# Parent  1eb430d9a1b9d02c02e90db6601ff2884fd8ff77
Fix bug #32873, ifftshift fails.

diff --git a/scripts/ChangeLog b/scripts/ChangeLog
--- 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
diff --git a/scripts/signal/ifftshift.m b/scripts/signal/ifftshift.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);