# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1225402275 14400
# Node ID b2a6309b2d8766b6df6c14f63c645e2ced50b87c
# Parent  ad5bb02d267aa32d5d762be488562503ba69dde5
oct-map.cc: copy key_list in indexing functions

diff --git a/src/ChangeLog b/src/ChangeLog
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2008-10-30  John W. Eaton  <jwe@octave.org>
+
+	* oct-map.cc (Octave_map::index): Copy key_list.
+
 2008-10-30  David Bateman  <dbateman@free.fr>
 
 	* graphic.h.in (axes::properties): Add keyreverse property.
diff --git a/src/oct-map.cc b/src/oct-map.cc
--- a/src/oct-map.cc
+++ b/src/oct-map.cc
@@ -487,6 +487,9 @@
 
 	  retval.assign (key(p), tmp);
 	}
+
+      // Preserve order of keys.
+      retval.key_list = key_list;
     }
   else
     retval = *this;
@@ -509,6 +512,9 @@
       retval.assign (key (p), tmp);
     }
 
+  // Preserve order of keys.
+  retval.key_list = key_list;
+
   return retval;
 }
 
@@ -528,6 +534,9 @@
       retval.assign (key (p), tmp);
     }
 
+  // Preserve order of keys.
+  retval.key_list = key_list;
+
   return retval;
 }
 
@@ -547,6 +556,9 @@
       retval.assign (key (p), tmp);
     }
 
+  // Preserve order of keys.
+  retval.key_list = key_list;
+
   return retval;
 }