===================================================================
RCS file: /cvs/mandoc/Attic/action.c,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -p -r1.12 -r1.13
--- mandoc/Attic/action.c	2009/01/19 17:02:58	1.12
+++ mandoc/Attic/action.c	2009/01/20 12:51:28	1.13
@@ -1,4 +1,4 @@
-/* $Id: action.c,v 1.12 2009/01/19 17:02:58 kristaps Exp $ */
+/* $Id: action.c,v 1.13 2009/01/20 12:51:28 kristaps Exp $ */
 /*
  * Copyright (c) 2008 Kristaps Dzonsons <kristaps@kth.se>
  *
@@ -29,12 +29,14 @@ struct	actions {
 
 /* Per-macro action routines. */
 
-static int	 post_sh(struct mdoc *);
-static int	 post_os(struct mdoc *);
-static int	 post_dt(struct mdoc *);
-static int	 post_dd(struct mdoc *);
-static int	 post_nm(struct mdoc *);
+static	int	 post_sh(struct mdoc *);
+static	int	 post_os(struct mdoc *);
+static	int	 post_dt(struct mdoc *);
+static	int	 post_dd(struct mdoc *);
+static	int	 post_nm(struct mdoc *);
 
+static	int	 post_prologue(struct mdoc *);
+
 /* Array of macro action routines. */
 
 const	struct actions mdoc_actions[MDOC_MAX] = {
@@ -226,7 +228,8 @@ post_dt(struct mdoc *mdoc)
 
 	if (NULL == mdoc->meta.title)
 		mdoc->meta.title = xstrdup("untitled");
-	return(1);
+
+	return(post_prologue(mdoc));
 }
 
 
@@ -244,7 +247,9 @@ post_os(struct mdoc *mdoc)
 
 	mdoc->meta.os = xstrdup(buf[0] ? buf : "local");
 	mdoc->sec_lastn = mdoc->sec_last = SEC_BODY;
-	return(1);
+	mdoc->flags |= MDOC_BODYPARSE;
+
+	return(post_prologue(mdoc));
 }
 
 
@@ -269,7 +274,7 @@ post_dd(struct mdoc *mdoc)
 		assert(MDOC_TEXT == n->type);
 		p = n->data.text.string;
 
-		if (xstrcmp(p, "$Mdocdate: January 19 2009 $")) {
+		if (xstrcmp(p, "$Mdocdate: January 20 2009 $")) {
 			mdoc->meta.date = time(NULL);
 			continue;
 		} else if (xstrcmp(p, "$")) {
@@ -285,12 +290,38 @@ post_dd(struct mdoc *mdoc)
 	}
 
 	if (mdoc->meta.date && NULL == n)
-		return(1);
+		return(post_prologue(mdoc));
 	else if (n)
 		return(mdoc_err(mdoc, "invalid parameter syntax"));
 	if ((mdoc->meta.date = mdoc_atotime(date)))
-		return(1);
+		return(post_prologue(mdoc));
 	return(mdoc_err(mdoc, "invalid parameter syntax"));
+}
+
+
+static int
+post_prologue(struct mdoc *mdoc)
+{
+	struct mdoc_node *n;
+
+	if (mdoc->last->parent->child == mdoc->last)
+		mdoc->last->parent->child = mdoc->last->prev;
+	if (mdoc->last->prev)
+		mdoc->last->prev->next = NULL;
+
+	n = mdoc->last;
+	assert(NULL == mdoc->last->next);
+
+	if (mdoc->last->prev) {
+		mdoc->last = mdoc->last->prev;
+		mdoc->next = MDOC_NEXT_SIBLING;
+	} else {
+		mdoc->last = mdoc->last->parent;
+		mdoc->next = MDOC_NEXT_CHILD;
+	}
+
+	mdoc_node_freelist(n);
+	return(1);
 }