diff --git a/ChangeLog b/ChangeLog
index 69d959dac..4a3589112 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2002-01-06  Richard Frith-Macdonald <rfm@gnu.org>
+
+	* Tools/autogsdoc.m: Minor bugfix ... any .h file processed should
+	also be processed as a .gsdoc file to produce indexes and html.
+
 2002-01-05  Richard Frith-Macdonald <rfm@gnu.org>
 
 	* Tools/autogsdoc.m: Simplify by removing SourceDirectory default.
diff --git a/Tools/AGSParser.m b/Tools/AGSParser.m
index 037b5fdfa..0e6c93497 100644
--- a/Tools/AGSParser.m
+++ b/Tools/AGSParser.m
@@ -481,6 +481,59 @@ fail:
   return nil;
 }
 
+/*
+- (NSString*) parseType
+{
+  NSMutableString	*m;
+  NSString		*s;
+  BOOL			hadName = NO;
+
+  s = [self parseIdentifier];
+  if (s == nil)
+    {
+      return nil;
+    }
+  m = [NSMutableString string];
+  [m appendString: s];
+  if ([qualifiers member: s] == nil)
+    {
+      hadName = YES;
+    }
+  [self skipWhiteSpace];
+  while (pos < length)
+    {
+      unsigned	saved;
+      BOOL	hadStar = NO;
+
+      while (pos < length && buffer[pos] == '*')
+	{
+	  if (hadStar == NO)
+	    {
+	      [m appendString: @" "];
+	      hadStar = YES;
+	    }
+	  [m appendString: @"*"];
+	  pos++;
+	  [self skipWhiteSpace];
+	}
+      saved = pos;
+      s = [self parseIdentifier];
+      if ([qualifiers member: s] == nil)
+	{
+	  if (hadName == YES)
+	    {
+	      pos = saved;
+	      break;
+	    }
+	  hadName = YES;
+	}
+      [m appendString: @" "];
+      [m appendString: s];
+    }
+  return m;
+}
+*/
+
 - (NSString*) parseIdentifier
 {
   unsigned	start;
diff --git a/Tools/autogsdoc.m b/Tools/autogsdoc.m
index b122aa131..967a41dc9 100644
--- a/Tools/autogsdoc.m
+++ b/Tools/autogsdoc.m
@@ -632,15 +632,12 @@ main(int argc, char **argv, char **env)
 		{
 		  NSLog(@"Sorry unable to write %@", gsdocfile);
 		}
-	      else
-		{
-		  /*
-		   * Add the newly created gsdoc file to the list of
-		   * those to process.
-		   */
-		  [gFiles addObject: [gsdocfile lastPathComponent]];
-		}
 	    }
+	  /*
+	   * Add the gsdoc file corresponding to the .h file to the list of
+	   * those to process.
+	   */
+	  [gFiles addObject: [gsdocfile lastPathComponent]];
 	}
       DESTROY(pool);
       DESTROY(parser);