diff --git a/ChangeLog b/ChangeLog
index 74b6b7b92..ce3ae5b64 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2005-02-21 14:10 Stefan Urbanek <stefan@agentfarms.net>
+
+	* Source/NSAttributedString.m: Fix loop decoding from archive.
+
 2005-02-18 06:20 Richard Frith-Macdonald <rfm@gnu.org>
 
 	* Source/NSString.m: Tidy up some of last patch for unicode filesystem
@@ -17,7 +21,7 @@
 	as the variable may not be set.  Sort variables because windows needs
 	them in alphabetical order.  Fix conversion to unicode.
 
-2005-02-16 14:40 Richard Frith-Macdonald <rfm@gnu.org>
+	2005-02-16 14:40 Richard Frith-Macdonald <rfm@gnu.org>
 
 	* config/patchxml.m4: Try to detect libxml2 in standard directories
 	exen if xml2-config is not present.
diff --git a/Source/NSAttributedString.m b/Source/NSAttributedString.m
index 32821f790..ea7559165 100644
--- a/Source/NSAttributedString.m
+++ b/Source/NSAttributedString.m
@@ -653,7 +653,7 @@ static Class GSMutableAttributedStringClass;
 
 	  self = [self initWithString: string attributes: nil];
 	  [self setAttributes: attrs range: r];
-	  while (index < length);
+	  while (index < length)
 	    {
 	      [aDecoder decodeValueOfObjCType: @encode(unsigned int)
 					   at: &index];