From 5658726e534d49e5451204429397ad6773a31a00 Mon Sep 17 00:00:00 2001
From: Quentin Spencer <qspencer@fedoraproject.org>
Date: Fri, 27 May 2005 15:32:26 +0000
Subject: [PATCH] Patch to fix data save problem (more info in spec changelog).

---
 octave-2.1.71-save.patch | 24 ++++++++++++++++++++++++
 octave.spec              |  7 ++++++-
 2 files changed, 30 insertions(+), 1 deletion(-)
 create mode 100644 octave-2.1.71-save.patch

diff --git a/octave-2.1.71-save.patch b/octave-2.1.71-save.patch
new file mode 100644
index 0000000..d4591ee
--- /dev/null
+++ b/octave-2.1.71-save.patch
@@ -0,0 +1,24 @@
+src/ChangeLog:
+
+2005-05-27  John W. Eaton  <jwe@octave.org>
+
+	* ls-mat5.cc (save_mat5_binary_element): Extract complex N-d
+	array, not matrix.
+
+
+Index: src/ls-mat5.cc
+===================================================================
+RCS file: /usr/local/cvsroot/octave/src/ls-mat5.cc,v
+retrieving revision 1.8.2.5
+diff -u -r1.8.2.5 ls-mat5.cc
+--- src/ls-mat5.cc	5 May 2005 03:53:38 -0000	1.8.2.5
++++ src/ls-mat5.cc	27 May 2005 14:14:32 -0000
+@@ -1180,7 +1180,7 @@
+     }
+   else if (tc.is_complex_scalar () || tc.is_complex_matrix ()) 
+     {
+-      ComplexNDArray m_cmplx = tc.complex_matrix_value ();
++      ComplexNDArray m_cmplx = tc.complex_array_value ();
+ 
+       write_mat5_array (os, ::real (m_cmplx), save_as_floats);
+       write_mat5_array (os, ::imag (m_cmplx), save_as_floats);
diff --git a/octave.spec b/octave.spec
index 461f336..c5ec0b8 100644
--- a/octave.spec
+++ b/octave.spec
@@ -2,13 +2,14 @@
 
 Name:           octave
 Version:        2.1.71
-Release:        2%{?dist}
+Release:        3%{?dist}
 Summary:        A high-level language for numerical computations
 Epoch:          6
 
 Group:          Applications/Engineering
 License:        GPL
 Source:         ftp://ftp.octave.org/pub/octave/bleeding-edge/octave-%{version}.tar.bz2
+Patch0:         octave-2.1.71-save.patch
 URL:            http://www.octave.org
 Requires:       gnuplot less info texinfo 
 Requires:       /sbin/install-info
@@ -46,6 +47,7 @@ applications which use GNU Octave.
 
 %prep
 %setup -q
+%patch0 -p0
 ./autogen.sh
 
 
@@ -123,6 +125,9 @@ fi
 
 
 %changelog
+* Fri May 27 2005 Quentin Spencer <qspencer@users.sourceforge.net> 2.1.71-3
+- Added patch for http://www.octave.org/mailing-lists/bug-octave/2005/617 
+
 * Thu May 26 2005 Quentin Spencer <qspencer@users.sourceforge.net> 2.1.71-2
 - Added dist tag.