diff --git a/ChangeLog b/ChangeLog
index 8f517d42f..c4a6c991a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2003-11-12  Tim Waugh  <twaugh@redhat.com>
+	* src/WriteXML.py: Fix ID sorting so that RCS versioning is useful
+	again (broken in last WriteXML change).
+
 2003-11-10  Alex Roitman  <shura@alex.neuro.umn.edu>
 	* src/edit_person.glade: Set meaningful ids for all tab labels.
 	* src/EditPerson.py (__init__): Find labels from XML, call
diff --git a/src/WriteXML.py b/src/WriteXML.py
index b85f6b5c1..0b574b413 100644
--- a/src/WriteXML.py
+++ b/src/WriteXML.py
@@ -203,7 +203,9 @@ class XmlWriter:
                 self.g.write(' default="%s"' % person.getId())
             self.g.write(">\n")
 
-            for key in self.db.sortPersonKeys():
+            keys = self.db.getPersonKeys()
+            keys.sort ()
+            for key in keys:
                 try:
                     person = self.db.getPerson(key)
                 except: