rmultimarkdown 4.7.1.1 → 6.2.2.1

data/MultiMarkdown-4/GLibFacade.h

@@ -1,100 +0,0 @@
-/*
- *	GLibFacade.h
- *	MultiMarkdown
- *	
- *	Created by Daniel Jalkut on 7/26/11.
- *  Modified by Fletcher T. Penney on 9/15/11 and 12/3/13.
- *	Modified by Dan Lowe on 1/3/12.
- *
- *	License for original code by Daniel Jalkut:
- *	
- *	Copyright 2011 Daniel Jalkut. All rights reserved.
- *	
- *	Permission is hereby granted, free of charge, to any person obtaining a copy of
- *	this software and associated documentation files (the “Software”), to deal in
- *	the Software without restriction, including without limitation the rights to
- *	use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
- *	of the Software, and to permit persons to whom the Software is furnished to do
- *	so, subject to the following conditions:
- *	
- *	The above copyright notice and this permission notice shall be included in all
- *	copies or substantial portions of the Software.
- *	
- *	THE SOFTWARE IS PROVIDED “AS IS”, WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
- *	IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
- *	FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
- *	AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
- *	LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
- *	OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
- *	SOFTWARE.
- */
-
-#ifndef __MARKDOWN_GLIB_FACADE__
-#define __MARKDOWN_GLIB_FACADE__
-
-/* peg_markdown uses the link symbol for its own purposes */
-#define link MARKDOWN_LINK_IGNORED
-#include <unistd.h>
-#undef link
-
-#include <stdbool.h>
-#include <ctype.h>
-
-typedef int gboolean;
-typedef char gchar;
-
-/* This style of bool is used in shared source code */
-#if !defined(FALSE)
-#define FALSE false
-#endif
-#if !defined(TRUE)
-#define TRUE true
-#endif
-
-/* WE implement minimal mirror implementations of GLib's GString and GSList 
- * sufficient to cover the functionality required by MultiMarkdown.
- *
- * NOTE: THese are 100% clean, from-scratch implementations using only the 
- * GLib function prototype as guide for behavior.
- */
-
-typedef struct 
-{	
-	/* Current UTF8 byte stream this string represents */
-	char* str;
-
-	/* Where in the str buffer will we add new characters */
-	/* or append new strings? */
-	unsigned long currentStringBufferSize;
-	unsigned long currentStringLength;
-} GString;
-
-GString* g_string_new(char *startingString);
-char* g_string_free(GString* ripString, bool freeCharacterData);
-
-void g_string_append_c(GString* baseString, char appendedCharacter);
-void g_string_append(GString* baseString, char *appendedString);
-
-void g_string_prepend(GString* baseString, char* prependedString);
-
-void g_string_append_printf(GString* baseString, char* format, ...);
-
-void g_string_insert(GString* baseString, size_t pos, char * insertedString);
-void g_string_insert_c(GString* baseString, size_t pos, char insertedCharacter);
-void g_string_insert_printf(GString* baseString, size_t pos, char* format, ...);
-
-void g_string_erase(GString* baseString, size_t pos, size_t len);
-
-/* Just implement a very simple singly linked list. */
-
-typedef struct _GSList
-{
-	void* data;	
-	struct _GSList* next;
-} GSList;
-
-void g_slist_free(GSList* ripList);
-GSList* g_slist_prepend(GSList* targetElement, void* newElementData);
-GSList* g_slist_reverse(GSList* theList);
-
-#endif

data/MultiMarkdown-4/beamer.c

@@ -1,182 +0,0 @@
-/*
-
-	beamer.c -- Beamer add-on to LaTeX writer
-
-	(c) 2013-2015 Fletcher T. Penney (http://fletcherpenney.net/).
-
-	This program is free software; you can redistribute it and/or modify
-	it under the terms of the GNU General Public License or the MIT
-	license.  See LICENSE for details.
-	
-	This program is distributed in the hope that it will be useful,
-	but WITHOUT ANY WARRANTY; without even the implied warranty of
-	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-	GNU General Public License for more details.
-
-*/
-
-#include "beamer.h"
-
-/* print_beamer_node_tree -- convert node tree to LaTeX */
-void print_beamer_node_tree(GString *out, node *list, scratch_pad *scratch) {
-	while (list != NULL) {
-		print_beamer_node(out, list, scratch);
-		list = list->next;
-	}
-}
-
-/* print_beamer_node -- convert given node to LaTeX and append */
-void print_beamer_node(GString *out, node *n, scratch_pad *scratch) {
-	int lev;
-	char *temp;
-	
-	/* If we are forcing a complete document, and METADATA isn't the first thing,
-		we need to close <head> */
-	if ((scratch->extensions & EXT_COMPLETE)
-		&& !(scratch->extensions & EXT_HEAD_CLOSED) && 
-		!((n->key == FOOTER) || (n->key == METADATA))) {
-			pad(out, 2, scratch);
-			scratch->extensions = scratch->extensions | EXT_HEAD_CLOSED;
-		}
-	switch (n->key) {
-		case FOOTER:
-			print_beamer_endnotes(out, scratch);
-			g_string_append_printf(out, "\\mode<all>\n");
-			if (scratch->latex_footer != NULL) {
-				pad(out, 2, scratch);
-				g_string_append_printf(out,"\\input{%s}\n", scratch->latex_footer);
-			}
-			if (scratch->extensions & EXT_COMPLETE) {
-				g_string_append_printf(out, "\n\\end{document}");
-			}
-			g_string_append_printf(out, "\\mode*\n");
-			break;
-		case LISTITEM:
-			pad(out, 1, scratch);
-			g_string_append_printf(out, "\\item<+-> ");
-			scratch->padded = 2;
-			print_latex_node_tree(out, n->children, scratch);
-			g_string_append_printf(out, "\n");
-			break;
-		case HEADINGSECTION:
-			if (n->children->key -H1 + scratch->baseheaderlevel == 3) {
-				pad(out, 2, scratch);
-				g_string_append_printf(out, "\\begin{frame}");
-				/* TODO: Fix this */
-				if (tree_contains_key(n->children,VERBATIM) ||
-				    tree_contains_key(n->children,VERBATIMFENCE)) {
-					g_string_append_printf(out, "[fragile]");
-				}
-				scratch->padded = 0;
-				print_beamer_node_tree(out, n->children, scratch);
-				g_string_append_printf(out, "\n\n\\end{frame}\n\n");
-				scratch->padded = 2;
-			} else if (n->children->key -H1 + scratch->baseheaderlevel == 4) {
-				pad(out, 1, scratch);
-				g_string_append_printf(out, "\\mode<article>{\n");
-				scratch->padded = 0;
-				print_beamer_node_tree(out, n->children->next, scratch);
-				g_string_append_printf(out, "\n\n}\n\n");
-				scratch->padded = 2;
-			} else {
-				print_beamer_node_tree(out, n->children, scratch);
-			}
-			break;
-		case H1: case H2: case H3: case H4: case H5: case H6:
-			pad(out, 2, scratch);
-			lev = n->key - H1 + scratch->baseheaderlevel;  /* assumes H1 ... H6 are in order */
-			switch (lev) {
-				case 1:
-					g_string_append_printf(out, "\\part{");
-					break;
-				case 2:
-					g_string_append_printf(out, "\\section{");
-					break;
-				case 3:
-					g_string_append_printf(out, "\\frametitle{");
-					break;
-				default:
-					g_string_append_printf(out, "\\emph{");
-					break;
-			}
-			/*  generate a label for each header (MMD);
-				don't allow footnotes since invalid here */
-			scratch->no_latex_footnote = TRUE;
-			if (n->children->key == AUTOLABEL) {
-				temp = label_from_string(n->children->str);
-				print_latex_node_tree(out, n->children->next, scratch);
-				g_string_append_printf(out, "}\n\\label{%s}", temp);
-				free(temp);
-			} else {
-				print_latex_node_tree(out, n->children, scratch);
-				temp = label_from_node_tree(n->children);
-				g_string_append_printf(out, "}\n\\label{%s}", temp);
-				free(temp);
-			}
-			scratch->no_latex_footnote = FALSE;
-			scratch->padded = 0;
-			break;
-		default:
-			/* most things are not changed for memoir output */
-			print_latex_node(out, n, scratch);
-	}
-}
-
-/* print_beamer_endnotes */
-void print_beamer_endnotes(GString *out, scratch_pad *scratch) {
-	scratch->used_notes = reverse_list(scratch->used_notes);
-	scratch->printing_notes = 1;
-	
-	node *note = scratch->used_notes;
-#ifdef DEBUG_ON
-	fprintf(stderr, "start endnotes\n");
-#endif
-	
-	if ((note == NULL) || ((note->key == KEY_COUNTER) && (note->next == NULL)))
-		return;
-	while (note != NULL) {
-		if (note->key == CITATIONSOURCE)
-			break;
-		note = note->next;
-	}
-
-	if (note == NULL)
-		return;
-	
-	note = scratch->used_notes;
-	
-	/* TODO: need CITATIONSOURCE to print bibliography */
-#ifdef DEBUG_ON
-	fprintf(stderr, "there are endnotes to print\n");
-#endif
-
-	pad(out, 2, scratch);
-	g_string_append_printf(out, "\\part{Bibliography}\n\\begin{frame}[allowframebreaks]\n\\frametitle{Bibliography}\n\\def\\newblock{}\n\\begin{thebibliography}{0}\n");
-	while ( note != NULL) {
-		if (note->key == KEY_COUNTER) {
-			note = note->next;
-			continue;
-		}
-		
-		pad(out, 1, scratch);
-		
-		if (note->key == CITATIONSOURCE) {
-			g_string_append_printf(out, "\\bibitem{%s}\n", note->str);
-			scratch->padded = 2;
-
-			print_latex_node(out, note, scratch);
-			pad(out, 1, scratch);
-			scratch->padded = 1;
-		} else {
-			/* footnotes handled elsewhere */
-		}
-
-		note = note->next;
-	}
-	pad(out,2, scratch);
-	g_string_append_printf(out, "\\end{thebibliography}\n\\end{frame}\n\n");
-	scratch->padded = 0;
-#ifdef DEBUG_ON
-	fprintf(stderr, "finish endnotes\n");
-#endif
-}

data/MultiMarkdown-4/beamer.h

@@ -1,11 +0,0 @@
-#ifndef BEAMER_PARSER_H
-#define BEAMER_PARSER_H
-
-#include "parser.h"
-#include "latex.h"
-
-void print_beamer_node_tree(GString *out, node *list, scratch_pad *scratch);
-void print_beamer_node(GString *out, node *n, scratch_pad *scratch);
-void print_beamer_endnotes(GString *out, scratch_pad *scratch);
-
-#endif

data/MultiMarkdown-4/critic.c

@@ -1,111 +0,0 @@
-/*
-
-	critic.c -- CriticMarkup preprocessor
-
-	<http://criticmarkup.com>
-
-	(c) 2013-2015 Fletcher T. Penney (http://fletcherpenney.net/).
-
-	This program is free software; you can redistribute it and/or modify
-	it under the terms of the GNU General Public License or the MIT
-	license.  See LICENSE for details.
-	
-	This program is distributed in the hope that it will be useful,
-	but WITHOUT ANY WARRANTY; without even the implied warranty of
-	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-	GNU General Public License for more details.
-
-*/
-
-#include "critic.h"
-
-void print_critic_accept_node_tree(GString *out, node *list, scratch_pad *scratch) {
-	while (list != NULL) {
-		print_critic_accept_node(out, list, scratch);
-		list = list->next;
-	}
-}
-
-void print_critic_reject_node_tree(GString *out, node *list, scratch_pad *scratch) {
-	while (list != NULL) {
-		print_critic_reject_node(out, list, scratch);
-		list = list->next;
-	}
-}
-
-void print_critic_html_highlight_node_tree(GString *out, node *list, scratch_pad *scratch) {
-	while (list != NULL) {
-		print_critic_html_highlight_node(out, list, scratch);
-		list = list->next;
-	}
-}
-
-void print_critic_accept_node(GString *out, node *n, scratch_pad *scratch) {
-	if (n == NULL)
-		return;
-	
-	switch (n->key) {
-		case LIST:
-		case CRITICSUBSTITUTION:
-			print_critic_accept_node_tree(out, n->children, scratch);
-			break;
-		case CRITICDELETION:
-		case CRITICCOMMENT:
-			break;
-		case CRITICHIGHLIGHT:
-		case CRITICADDITION:
-		default:
-			g_string_append_printf(out,"%s",n->str);
-			break;
-	}
-}
-
-void print_critic_reject_node(GString *out, node *n, scratch_pad *scratch) {
-	if (n == NULL)
-		return;
-
-	switch (n->key) {
-		case LIST:
-		case CRITICSUBSTITUTION:
-			print_critic_reject_node_tree(out, n->children, scratch);
-			break;
-		case CRITICADDITION:
-		case CRITICCOMMENT:
-			break;
-		case CRITICHIGHLIGHT:
-		case CRITICDELETION:
-		default:
-			g_string_append_printf(out,"%s",n->str);
-			break;
-	}
-}
-
-void print_critic_html_highlight_node(GString *out, node *n, scratch_pad *scratch) {
-	if (n == NULL)
-		return;
-	
-	switch (n->key) {
-		case LIST:
-			print_critic_html_highlight_node_tree(out, n->children, scratch);
-			break;
-		case CRITICSUBSTITUTION:
-			print_critic_html_highlight_node_tree(out, n->children, scratch);
-			break;
-		case CRITICADDITION:
-			g_string_append_printf(out,"<ins>%s</ins>",n->str);
-			break;
-		case CRITICCOMMENT:
-			/* Hide comments for now */
-			/* g_string_append_printf(out, "<span class=\"critic comment\">%s</span>", n->str); */
-			break;
-		case CRITICHIGHLIGHT:
-			g_string_append_printf(out,"<mark>%s</mark>",n->str);
-			break;
-		case CRITICDELETION:
-			g_string_append_printf(out,"<del>%s</del>",n->str);
-			break;
-		default:
-			g_string_append_printf(out,"%s",n->str);
-			break;
-	}
-}

data/MultiMarkdown-4/critic.h

@@ -1,15 +0,0 @@
-#ifndef CRITIC_PARSER_H
-#define CRITIC_PARSER_H
-
-#include "parser.h"
-#include "writer.h"
-
-
-void print_critic_accept_node_tree(GString *out, node *list, scratch_pad *scratch);
-void print_critic_reject_node_tree(GString *out, node *list, scratch_pad *scratch);
-void print_critic_html_highlight_node_tree(GString *out, node *list, scratch_pad *scratch);
-void print_critic_accept_node(GString *out, node *list, scratch_pad *scratch);
-void print_critic_reject_node(GString *out, node *list, scratch_pad *scratch);
-void print_critic_html_highlight_node(GString *out, node *list, scratch_pad *scratch);
-
-#endif

data/MultiMarkdown-4/glib.h

@@ -1,11 +0,0 @@
-/*
- *  glib.h
- *  MultiMarkdown
- *
- *  Created by Daniel Jalkut on 7/26/11.
- *  Copyright 2011 __MyCompanyName__. All rights reserved.
- *
- */
-
-/* Just a dummy file to keep the glib-dependent sources compiling as we would hope */
-#include "GLibFacade.h"

data/MultiMarkdown-4/html.c

@@ -1,1117 +0,0 @@
-/*
-
-	html.c -- HTML writer
-
-	(c) 2013-2015 Fletcher T. Penney (http://fletcherpenney.net/).
-
-	Derived from peg-multimarkdown, which was forked from peg-markdown,
-	which is (c) 2008 John MacFarlane (jgm at berkeley dot edu), and 
-	licensed under GNU GPL or MIT.
-
-	This program is free software; you can redistribute it and/or modify
-	it under the terms of the GNU General Public License or the MIT
-	license.  See LICENSE for details.
-	
-	This program is distributed in the hope that it will be useful,
-	but WITHOUT ANY WARRANTY; without even the implied warranty of
-	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-	GNU General Public License for more details.
-
-*/
-
-#include "html.h"
-
-bool is_html_complete_doc(node *meta);
-void print_col_group(GString *out,scratch_pad *scratch);
-
-
-/* print_html_node_tree -- convert node tree to HTML */
-void print_html_node_tree(GString *out, node *list, scratch_pad *scratch) {
-	while (list != NULL) {
-		print_html_node(out, list, scratch);
-		list = list->next;
-	}
-}
-
-/* print_html_node -- convert given node to HTML and append */
-void print_html_node(GString *out, node *n, scratch_pad *scratch) {
-	node *temp_node;
-	link_data *temp_link_data = NULL;
-	char *temp;
-	int lev;
-	int random;
-	char temp_type;
-	char *width = NULL;
-	char *height = NULL;
-	GString *temp_str;
-
-	if (n == NULL)
-		return;
-	
-	/* debugging statement */
-#ifdef DEBUG_ON
-	fprintf(stderr, "print_html_node: %d\n",n->key);
-#endif
-	
-	/* If we are forcing a complete document, and METADATA isn't the first thing,
-		we need to close <head> */
-	if ((scratch->extensions & EXT_COMPLETE)
-		&& !(scratch->extensions & EXT_HEAD_CLOSED) && 
-		!((n->key == FOOTER) || (n->key == METADATA))) {
-			g_string_append_printf(out, "</head>\n<body>\n");
-			scratch->extensions = scratch->extensions | EXT_HEAD_CLOSED;
-		}
-	switch (n->key) {
-		case NO_TYPE:
-			break;
-		case LIST:
-			print_html_node_tree(out,n->children,scratch);
-			break;
-		case STR:
-			/* fprintf(stderr, "str: '%s'\n", n->str); */
-			print_html_string(out,n->str, scratch);
-			break;
-		case ABBR:
-			if (strlen(n->children->str) == 0) {
-				g_string_append_printf(out, "<abbr>");
-			} else {
-				g_string_append_printf(out, "<abbr title=\"");
-				print_html_string(out, n->children->str, scratch);
-				g_string_append_printf(out, "\">");
-			}
-			print_html_string(out,n->str, scratch);
-			g_string_append_printf(out, "</abbr>");
-			break;
-		case ABBRSTART:
-			if (strlen(n->children->str) == 0) {
-				g_string_append_printf(out, "<abbr>");
-			} else {
-				g_string_append_printf(out, "<abbr title=\"");
-				print_html_string(out, n->children->str, scratch);
-				g_string_append_printf(out, "\">");
-			}
-			print_html_string(out,n->str, scratch);
-			break;
-		case ABBRSTOP:
-			print_html_string(out,n->str, scratch);
-			g_string_append_printf(out, "</abbr>");
-			break;		
-		case SPACE:
-			g_string_append_printf(out,"%s",n->str);
-			break;
-		case PLAIN:
-			pad(out,1, scratch);
-			print_html_node_tree(out,n->children, scratch);
-			scratch->padded = 0;
-			break;
-		case PARA:
-			pad(out, 2, scratch);
-			g_string_append_printf(out, "<p>");
-			print_html_node_tree(out,n->children,scratch);
-			if (scratch->footnote_to_print != 0){
-				scratch->footnote_para_counter --;
-				if (scratch->footnote_para_counter == 0) {
-					if (scratch->extensions & EXT_RANDOM_FOOT) {
-						srand(scratch->random_seed_base + scratch->footnote_to_print);
-						random = rand() % 99999 + 1;
-					} else {
-						random = scratch->footnote_to_print;
-					}
-				
-					g_string_append_printf(out, " <a href=\"#fnref:%d\" title=\"return to article\" class=\"reversefootnote\">&#160;&#8617;</a>", random);
-					scratch->footnote_to_print = 0;
-				}
-			}
-			g_string_append_printf(out, "</p>");
-			scratch->padded = 0;
-			break;
-		case HRULE:
-			pad(out, 2, scratch);
-			g_string_append_printf(out, "<hr />");
-			scratch->padded = 0;
-			break;
-		case HTMLBLOCK:
-			pad(out, 2, scratch);
-			g_string_append_printf(out, "%s", n->str);
-			scratch->padded = 0;
-			break;
-		case VERBATIM:
-		case VERBATIMFENCE:
-			pad(out, 2, scratch);
-			if ((n->children != NULL) && (n->children->key == VERBATIMTYPE)) {
-				trim_trailing_whitespace(n->children->str);
-				if (strlen(n->children->str) > 0)
-					g_string_append_printf(out, "<pre><code class=\"%s\">", n->children->str);
-				else
-					g_string_append_printf(out, "%s", "<pre><code>");
-			} else {
-				g_string_append_printf(out, "%s", "<pre><code>");
-			}
-			print_html_string(out, n->str, scratch);
-			g_string_append_printf(out, "%s", "</code></pre>");
-			scratch->padded = 0;
-			break;
-		case BULLETLIST:
-			pad(out, 2, scratch);
-			g_string_append_printf(out, "%s", "<ul>");
-			scratch->padded = 0;
-			print_html_node_tree(out, n->children, scratch);
-			pad(out, 1, scratch);
-			g_string_append_printf(out, "%s", "</ul>");
-			scratch->padded = 0;
-			break;
-		case ORDEREDLIST:
-			pad(out, 2, scratch);
-			g_string_append_printf(out, "%s", "<ol>");
-			scratch->padded = 0;
-			print_html_node_tree(out, n->children, scratch);
-			pad(out, 1, scratch);
-			g_string_append_printf(out, "</ol>");
-			scratch->padded = 0;
-			break;
-		case LISTITEM:
-			pad(out, 1, scratch);
-			g_string_append_printf(out, "<li>");
-			scratch->padded = 2;
-			print_html_node_tree(out, n->children, scratch);
-			g_string_append_printf(out, "</li>");
-			scratch->padded = 0;
-			break;
-		case METADATA:
-			/* Not if snippet only */
-			if (scratch->extensions & EXT_SNIPPET) {
-				is_html_complete_doc(n);
-				print_html_node_tree(out,n->children, scratch);
-				break;
-			}
-			
-			if (!(scratch->extensions & EXT_COMPLETE) && (is_html_complete_doc(n))) {
-				/* We have metadata to include, and didn't already force complete */
-				g_string_append_printf(out,
-				"<!DOCTYPE html>\n<html>\n<head>\n\t<meta charset=\"utf-8\"/>\n");
-				/* either way, now we need to be a complete doc */
-				scratch->extensions = scratch->extensions | EXT_COMPLETE;
-			} else {
-				/* Ensure we lowercase metadata */
-				is_html_complete_doc(n);
-			}
-			/* print the metadata */
-			scratch->extensions = scratch->extensions | EXT_HEAD_CLOSED;
-			print_html_node_tree(out,n->children, scratch);
-			if (scratch->extensions & EXT_COMPLETE) {
-				/* need to close head and open body */
-				g_string_append_printf(out, "</head>\n<body>\n\n");
-			}
-			break;
-		case METAKEY:
-			if (strcmp(n->str, "baseheaderlevel") == 0) {
-				scratch->baseheaderlevel = atoi(n->children->str);
-				break;
-			} else if (strcmp(n->str, "xhtmlheaderlevel") == 0) {
-				scratch->baseheaderlevel = atoi(n->children->str);
-				break;
-			} else if (strcmp(n->str, "htmlheaderlevel") == 0) {
-				scratch->baseheaderlevel = atoi(n->children->str);
-				break;
-			} else if (strcmp(n->str, "quoteslanguage") == 0) {
-				temp = label_from_node_tree(n->children);
-				if ((strcmp(temp, "nl") == 0) || (strcmp(temp, "dutch") == 0)) { scratch->language = DUTCH; }   else 
-				if ((strcmp(temp, "de") == 0) || (strcmp(temp, "german") == 0)) { scratch->language = GERMAN; } else 
-				if (strcmp(temp, "germanguillemets") == 0) { scratch->language = GERMANGUILL; } else 
-				if ((strcmp(temp, "fr") == 0) || (strcmp(temp, "french") == 0)) { scratch->language = FRENCH; } else 
-				if ((strcmp(temp, "sv") == 0) || (strcmp(temp, "swedish") == 0)) { scratch->language = SWEDISH; }
-				free(temp);
-				break;
-			}
-			
-			/* Don't handle other metadata if we're snippet only */
-			if (scratch->extensions & EXT_SNIPPET)
-				break;
-			
-			if (strcmp(n->str, "title") == 0) {
-				g_string_append_printf(out, "\t<title>");
-				print_html_node(out, n->children, scratch);
-				g_string_append_printf(out, "</title>\n");
-			} else if (strcmp(n->str, "css") == 0) {
-				g_string_append_printf(out, "\t<link type=\"text/css\" rel=\"stylesheet\" href=\"");
-				print_html_node(out, n->children, scratch);
-				g_string_append_printf(out, "\"/>\n");
-			} else if (strcmp(n->str, "xhtmlheader") == 0) {
-				trim_trailing_whitespace(n->children->str);
-				print_raw_node(out, n->children);
-				g_string_append_printf(out, "\n");
-			} else if (strcmp(n->str, "htmlheader") == 0) {
-				trim_trailing_whitespace(n->children->str);
-				print_raw_node(out, n->children);
-				g_string_append_printf(out, "\n");
-			} else if (strcmp(n->str, "mmdfooter") == 0) {
-			} else {
-				g_string_append_printf(out,"\t<meta name=\"%s\" content=\"",n->str);
-				print_html_node(out,n->children,scratch);
-				g_string_append_printf(out,"\"/>\n");
-			}
-			break;
-		case METAVALUE:
-			trim_trailing_whitespace(n->str);
-			print_html_string(out,n->str, scratch);
-			break;
-		case FOOTER:
-			break;
-		case HEADINGSECTION:
-			print_html_node_tree(out,n->children,scratch);
-			break;
-		case H1: case H2: case H3: case H4: case H5: case H6:
-			lev = n->key - H1 + scratch->baseheaderlevel;  /* assumes H1 ... H6 are in order */
-			if (lev > 6)
-				lev = 6;	/* Max at level 6 */
-			pad(out, 2, scratch);
-			if ( scratch->extensions & EXT_COMPATIBILITY ) {
-				/* Use regular Markdown header format */
-				g_string_append_printf(out, "<h%1d>", lev);
-				print_html_node_tree(out, n->children, scratch);
-			} else if (n->children->key == AUTOLABEL) {
-				temp = label_from_string(n->children->str);
-				/* use label for header since one was specified (MMD)*/
-				g_string_append_printf(out, "<h%d id=\"%s\">", lev,temp);
-				print_html_node_tree(out, n->children->next, scratch);
-				free(temp);
-			} else if ( scratch->extensions & EXT_NO_LABELS ) {
-				/* Don't generate a label */
-				g_string_append_printf(out, "<h%1d>", lev);
-				print_html_node_tree(out, n->children, scratch);
-			} else {
-				/* generate a label by default for MMD */
-				temp = label_from_node_tree(n->children);
-				g_string_append_printf(out, "<h%d id=\"%s\">", lev, temp);
-				print_html_node_tree(out, n->children, scratch);
-				free(temp);
-			}
-			g_string_append_printf(out, "</h%1d>", lev);
-			scratch->padded = 0;
-			break;
-		case APOSTROPHE:
-			print_html_localized_typography(out, APOS, scratch);
-			break;
-		case ELLIPSIS:
-			print_html_localized_typography(out, ELLIP, scratch);
-			break;
-		case EMDASH:
-			print_html_localized_typography(out, MDASH, scratch);
-			break;
-		case ENDASH:
-			print_html_localized_typography(out, NDASH, scratch);
-			break;
-		case SINGLEQUOTED:
-			print_html_localized_typography(out, LSQUOTE, scratch);
-			print_html_node_tree(out, n->children, scratch);
-			print_html_localized_typography(out, RSQUOTE, scratch);
-			break;
-		case DOUBLEQUOTED:
-			print_html_localized_typography(out, LDQUOTE, scratch);
-			print_html_node_tree(out, n->children, scratch);
-			print_html_localized_typography(out, RDQUOTE, scratch);
-			break;
-		case LINEBREAK:
-			g_string_append_printf(out, "<br/>\n");
-			break;
-		case MATHSPAN:
-			temp = strdup(n->str);
-			if (temp[0] == '$') {
-				temp[strlen(temp)-1] = '\0';
-				if (temp[1] == '$') {
-					temp[strlen(temp)-1] = '\0';
-					g_string_append_printf(out, "<span class=\"math\">\\[%s\\]</span>",&temp[2]);
-				} else {
-					g_string_append_printf(out, "<span class=\"math\">\\(%s\\)</span>",&temp[1]);
-				}
-			} else if (temp[strlen(temp) - 1] == ']') {
-				temp[strlen(temp) - 3] = '\0';
-				g_string_append_printf(out, "<span class=\"math\">%s\\]</span>",temp);
-			} else {
-				temp[strlen(temp) - 3] = '\0';
-				g_string_append_printf(out, "<span class=\"math\">%s\\)</span>",temp);
-			}
-			free(temp);
-			break;
-		case STRONG:
-			g_string_append_printf(out, "<strong>");
-			print_html_node_tree(out,n->children,scratch);
-			g_string_append_printf(out, "</strong>");
-		break;
-		case EMPH:
-			g_string_append_printf(out, "<em>");
-			print_html_node_tree(out,n->children,scratch);
-			g_string_append_printf(out, "</em>");
-		break;
-		case LINKREFERENCE:
-			break;
-		case LINK:
-#ifdef DEBUG_ON
-	fprintf(stderr, "print html link: '%s'\n",n->str);
-#endif
-			/* Stash a copy of the link data */
-			if (n->link_data != NULL)
-				temp_link_data = mk_link_data(n->link_data->label, n->link_data->source, n->link_data->title, n->link_data->attr);
-
-			/* Do we have proper info? */
-			if ((n->link_data->label == NULL) &&
-			(n->link_data->source == NULL)) {
-				/* we seem to be a [foo][] style link */
-				/* so load a label */
-				temp_str = g_string_new("");
-				print_raw_node_tree(temp_str, n->children);
-				n->link_data->label = temp_str->str;
-				g_string_free(temp_str, FALSE);
-			}
-			/* Load reference data */
-			if (n->link_data->label != NULL) {
-				temp = strdup(n->link_data->label);
-
-				n->link_data->attr = NULL;
-				free_link_data(n->link_data);
-
-				n->link_data = extract_link_data(temp, scratch);
-				if (n->link_data == NULL) {
-					/* replace original text since no definition found */
-					g_string_append_printf(out, "[");
-					print_html_node(out, n->children, scratch);
-					g_string_append_printf(out,"]");
-					if (n->children->next != NULL) {
-						g_string_append_printf(out, "[");
-						print_html_node_tree(out, n->children->next, scratch);
-						g_string_append_printf(out,"]");
-					} else if (n->str != NULL) {
-						/* no title label, so see if we stashed str*/
-						g_string_append_printf(out, "%s", n->str);
-					} else {
-						g_string_append_printf(out, "[%s]",temp);
-					}
-					
-					free(temp);
-
-					/* Restore stashed copy */
-					n->link_data = temp_link_data;
-
-					break;
-				}
-				free(temp);
-			}
-			g_string_append_printf(out, "<a");
-			if (n->link_data->source != NULL) {
-				g_string_append_printf(out, " href=\"");
-				if (strncmp(n->link_data->source,"mailto:", 6) == 0) {
-					scratch->obfuscate = 1;		/* flag obfuscated */
-				}
-				print_html_string(out,n->link_data->source, scratch);
-				g_string_append_printf(out, "\"");
-			}
-			if ((n->link_data->title != NULL) && (strlen(n->link_data->title) > 0)) {
-				g_string_append_printf(out, " title=\"");
-				print_html_string(out, n->link_data->title, scratch);
-				g_string_append_printf(out, "\"");
-			}
-			print_html_node_tree(out, n->link_data->attr, scratch);
-			g_string_append_printf(out, ">");
-			if (n->children != NULL)
-				print_html_node_tree(out,n->children,scratch);
-			g_string_append_printf(out, "</a>");
-			scratch->obfuscate = 0;
-
-			/* Restore stashed copy */
-			n->link_data->attr = NULL;
-			free_link_data(n->link_data);
-			n->link_data = temp_link_data;
-
-			break;
-		case ATTRKEY:
-			if ( (strcmp(n->str,"height") == 0) || (strcmp(n->str, "width") == 0)) {
-			} else {
-				g_string_append_printf(out, " %s=\"%s\"", n->str,
-					n->children->str);
-			}
-			break;
-		case REFNAME:
-		case SOURCE:
-		case TITLE:
-			break;
-		case IMAGEBLOCK:
-			pad(out,2, scratch);
-		case IMAGE:
-#ifdef DEBUG_ON
-	fprintf(stderr, "print image\n");
-#endif
-            /* Verify all is well */
-            if (n->link_data == NULL) {
-                fprintf(stderr, "Invalid IMAGEBLOCK or IMAGE -- (null) link_data\n");
-                exit(EXIT_FAILURE);
-            }
-                
-			/* Stash a copy of the link data */
-			if (n->link_data != NULL)
-				temp_link_data = mk_link_data(n->link_data->label, n->link_data->source, n->link_data->title, n->link_data->attr);
-
-			if (n->key == IMAGEBLOCK)
-				g_string_append_printf(out, "<figure>\n");
-			/* Do we have proper info? */
-			if ((n->link_data->label == NULL) &&
-			(n->link_data->source == NULL)) {
-				/* we seem to be a [foo][] style link */
-				/* so load a label */
-				temp_str = g_string_new("");
-				print_raw_node_tree(temp_str, n->children);
-				n->link_data->label = temp_str->str;
-				g_string_free(temp_str, FALSE);
-			}
-#ifdef DEBUG_ON
-	fprintf(stderr, "load reference data\n");
-#endif
-			/* Load reference data */
-			if (n->link_data->label != NULL) {
-				temp = strdup(n->link_data->label);
-
-				n->link_data->attr = NULL;
-				free_link_data(n->link_data);
-
-				n->link_data = extract_link_data(temp, scratch);
-				
-				if (n->link_data == NULL) {
-					g_string_append_printf(out, "![");
-					print_html_node_tree(out, n->children, scratch);
-					g_string_append_printf(out,"][%s]",temp);
-
-					/* Restore stashed copy */
-					n->link_data = temp_link_data;
-
-					free(temp);
-
-					break;
-				}
-				free(temp);
-			}
-#ifdef DEBUG_ON
-	fprintf(stderr, "create img\n");
-#endif
-			g_string_append_printf(out, "<img");
-			if (n->link_data->source != NULL)
-				g_string_append_printf(out, " src=\"%s\"",n->link_data->source);
-			if (n->children != NULL) {
-				g_string_append_printf(out, " alt=\"");
-				temp_str = g_string_new("");
-				print_raw_node_tree(temp_str, n->children);
-				print_html_string(out, temp_str->str, scratch);
-				g_string_free(temp_str, true);
-				g_string_append_printf(out, "\"");
-			} else {
-				g_string_append_printf(out, " alt=\"%s\"",n->link_data->title);
-			}
-			if (!(scratch->extensions & EXT_COMPATIBILITY)) {
-				if (n->link_data->label != NULL) {
-					temp = label_from_string(n->link_data->label);
-					g_string_append_printf(out, " id=\"%s\"",temp);
-					free(temp);
-				}
-			}
-			if ((n->link_data->title != NULL) && (strlen(n->link_data->title) > 0)) {
-				g_string_append_printf(out, " title=\"");
-				print_html_string(out, n->link_data->title, scratch);
-				g_string_append_printf(out, "\"");
-			}
-#ifdef DEBUG_ON
-	fprintf(stderr, "attributes\n");
-#endif
-			if (n->link_data->attr != NULL) {
-				temp_node = node_for_attribute("height",n->link_data->attr);
-				if (temp_node != NULL)
-					height = strdup(temp_node->children->str);
-				temp_node = node_for_attribute("width",n->link_data->attr);
-				if (temp_node != NULL)
-					width = strdup(temp_node->children->str);
-				if ((height != NULL) || (width != NULL)) {
-	#ifdef DEBUG_ON
-		fprintf(stderr, "width/height\n");
-	#endif
-				g_string_append_printf(out, " style=\"");
-				if (height != NULL)
-					g_string_append_printf(out, "height:%s;", height);
-				if (width != NULL)
-					g_string_append_printf(out, "width:%s;", width);
-				g_string_append_printf(out, "\"");
-			}
-	#ifdef DEBUG_ON
-		fprintf(stderr, "other attributes\n");
-	#endif
-				print_html_node_tree(out, n->link_data->attr, scratch);
-				free(height);
-				free(width);
-			}
-			g_string_append_printf(out, " />");
-			if (n->key == IMAGEBLOCK) {
-				if (n->children != NULL) {
-					temp_str = g_string_new("");
-					print_html_node(temp_str,n->children,scratch);
-					if (temp_str->currentStringLength > 0) {
-						g_string_append_printf(out, "\n<figcaption>");
-						g_string_append(out, temp_str->str);
-						g_string_append_printf(out, "</figcaption>");
-					}
-					g_string_free(temp_str, true);
-				}
-				g_string_append_printf(out,"\n</figure>");
-				scratch->padded = 0;
-			}
-
-			/* Restore stashed copy */
-			n->link_data->attr = NULL;
-			free_link_data(n->link_data);
-			n->link_data = temp_link_data;
-
-			break;
-#ifdef DEBUG_ON
-	fprintf(stderr, "finish image\n");
-#endif
-		case NOTEREFERENCE:
-			lev = note_number_for_node(n, scratch);
-			temp_node = node_for_count(scratch->used_notes, lev);
-			
-			if (scratch->extensions & EXT_RANDOM_FOOT) {
-				srand(scratch->random_seed_base + lev);
-				random = rand() % 99999 + 1;
-			} else {
-				random = lev;
-			}
-			
-			if (temp_node->key == GLOSSARYSOURCE) {
-				if (lev > scratch->max_footnote_num) {
-					g_string_append_printf(out, "<a href=\"#fn:%d\" id=\"fnref:%d\" title=\"see footnote\" class=\"footnote glossary\">[%d]</a>",
-						random, random, lev);
-						scratch->max_footnote_num = lev;
-				} else {
-					g_string_append_printf(out, "<a href=\"#fn:%d\" title=\"see footnote\" class=\"footnote glossary\">[%d]</a>",
-						random, lev);
-				}
-			} else {
-				if (lev > scratch->max_footnote_num) {
-					g_string_append_printf(out, "<a href=\"#fn:%d\" id=\"fnref:%d\" title=\"see footnote\" class=\"footnote\">[%d]</a>",
-						random, random, lev);
-						scratch->max_footnote_num = lev;
-				} else {
-					g_string_append_printf(out, "<a href=\"#fn:%d\" title=\"see footnote\" class=\"footnote\">[%d]</a>",
-						random, lev);
-				}
-			}
-			break;
-		case NOCITATION:
-		case CITATION:
-#ifdef DEBUG_ON
-	fprintf(stderr, "print cite\n");
-#endif
-			if ((n->link_data != NULL) && (strncmp(n->link_data->label,"[#",2) == 0)) {
-				fprintf(stderr, "external cite\n");
-				/* external citation (e.g. BibTeX) */
-				if (n->key == NOCITATION) {
-					g_string_append_printf(out, "<span class=\"notcited\" id=\"%s\"/>",n->str);
-				} else {
-					g_string_append_printf(out, "<span class=\"externalcitation\">");
-					g_string_append_printf(out, "</span>");
-				}
-			} else {
-#ifdef DEBUG_ON
-				fprintf(stderr, "internal cite\n");
-#endif
-				/* MMD citation, so output as footnote */
-				/* TODO: create separate stream from footnotes */
-				lev = 0;
-				if (n->link_data != NULL)
-					lev = note_number_for_label(n->link_data->label, scratch);
-				if (lev != 0) {
-#ifdef DEBUG_ON
-					fprintf(stderr, "matching cite found - %d\n",lev);
-#endif
-					if (scratch->extensions & EXT_RANDOM_FOOT) {
-						srand(scratch->random_seed_base + lev);
-						random = rand() % 99999 + 1;
-					} else {
-						random = lev;
-					}
-					
-					temp_node = node_for_count(scratch->used_notes, lev);
-					/* flag that this is used as a citation */
-					temp_node->key = CITATIONSOURCE;
-					if (lev > scratch->max_footnote_num) {
-						scratch->max_footnote_num = lev;
-					}
-					if (n->key == NOCITATION) {
-						g_string_append_printf(out, "<span class=\"notcited\" id=\"%d\">",random);
-					} else {
-						g_string_append_printf(out, "<a class=\"citation\" href=\"#fn:%d\" title=\"Jump to citation\">[",
-							random);
-							if (n->children != NULL) {
-								g_string_append_printf(out, "<span class=\"locator\">");
-								print_html_node(out, n->children, scratch);
-								g_string_append_printf(out, "</span>, %d]", lev);
-							} else {
-								g_string_append_printf(out, "%d]", lev);
-							}
-					}
-					g_string_append_printf(out, "<span class=\"citekey\" style=\"display:none\">%s</span>", n->link_data->label);
-					if (n->key == NOCITATION) {
-						g_string_append_printf(out, "</span>");
-					} else {
-						g_string_append_printf(out, "</a>");
-					}
-				} else {
-					/* not located -- this is external cite */
-#ifdef DEBUG_ON
-				fprintf(stderr, "no match for cite: '%s'\n",n->link_data->label);
-#endif
-					if ((n->link_data != NULL) && (n->key == NOCITATION)) {
-						g_string_append_printf(out, "<span class=\"notcited\" id=\"%s\"/>",n->link_data->label);
-					} else if (n->link_data != NULL) {
-						g_string_append_printf(out, "<span class=\"externalcitation\">[");
-						if (n->children != NULL) {
-							print_html_node(out, n->children, scratch);
-							g_string_append_printf(out, "][");
-						}
-						g_string_append_printf(out, "#%s]</span>",n->link_data->label);
-					}
-				}
-			}
-#ifdef DEBUG_ON
-		fprintf(stderr, "finish cite\n");
-#endif
-			break;
-		case VARIABLE:
-			temp = metavalue_for_key(n->str,scratch->result_tree);
-			if (temp == NULL) {
-				g_string_append_printf(out, "[%%%s]",n->str);
-			} else {
-				g_string_append_printf(out, temp);
-				free(temp);
-			}
-			break;
-		case GLOSSARYTERM:
-			g_string_append_printf(out,"<span class=\"glossary name\">");
-			print_html_string(out, n->children->str, scratch);
-			g_string_append_printf(out, "</span>");
-			if ((n->next != NULL) && (n->next->key == GLOSSARYSORTKEY) ) {
-				g_string_append_printf(out, "<span class=\"glossary sort\" style=\"display:none\">");
-				print_html_string(out, n->next->str, scratch);
-				g_string_append_printf(out, "</span>");
-			}
-			g_string_append_printf(out, ": ");
-			break;
-		case GLOSSARYSORTKEY:
-			break;
-		case CODE:
-			g_string_append_printf(out, "<code>");
-			print_html_string(out, n->str, scratch);
-			g_string_append_printf(out, "</code>");
-			break;
-		case BLOCKQUOTEMARKER:
-			print_html_node_tree(out, n->children, scratch);
-			break;
-		case BLOCKQUOTE:
-			pad(out,2, scratch);
-			g_string_append_printf(out, "<blockquote>\n");
-			scratch->padded = 2;
-			print_html_node_tree(out, n->children, scratch);
-			pad(out,1, scratch);
-			g_string_append_printf(out, "</blockquote>");
-			scratch->padded = 0;
-			break;
-		case RAW:
-			g_string_append_printf(out, "RAW:");
-			g_string_append_printf(out,"%s",n->str);
-			break;
-		case HTML:
-			g_string_append_printf(out, "%s", n->str);
-			break;
-		case DEFLIST:
-			pad(out,2, scratch);
-			scratch->padded = 1;
-			g_string_append_printf(out, "<dl>\n");
-			print_html_node_tree(out, n->children, scratch);
-			g_string_append_printf(out, "</dl>");
-			scratch->padded = 0;
-			break;
-		case TERM:
-			pad(out,1, scratch);
-			g_string_append_printf(out, "<dt>");
-			print_html_node_tree(out, n->children, scratch);
-			g_string_append_printf(out, "</dt>\n");
-			scratch->padded = 1;
-			break;
-		case DEFINITION:
-			pad(out,1, scratch);
-			scratch->padded = 1;
-			g_string_append_printf(out, "<dd>");
-			print_html_node_tree(out, n->children, scratch);
-			g_string_append_printf(out, "</dd>\n");
-			scratch->padded = 0;
-			break;
-		case TABLE:
-			pad(out,2, scratch);
-			g_string_append_printf(out, "<table>\n");
-			print_html_node_tree(out, n->children, scratch);
-			g_string_append_printf(out, "</table>\n");
-			scratch->cell_type = 0;
-			scratch->padded = 1;
-			scratch->table_alignment = NULL;
-			break;
-		case TABLESEPARATOR:
-			scratch->table_alignment = n->str;
-			if (scratch->cell_type == 0)
-				print_col_group(out, scratch);
-			scratch->cell_type = 'd';
-			break;
-		case TABLECAPTION:
-			if ((n->children != NULL) && (n->children->key == TABLELABEL)) {
-				temp = label_from_string(n->children->str);
-			} else {
-				temp = label_from_node_tree(n->children);
-			}
-			g_string_append_printf(out, "<caption id=\"%s\">", temp);
-			print_html_node_tree(out, n->children, scratch);
-			g_string_append_printf(out, "</caption>\n");
-			free(temp);
-			break;
-		case TABLELABEL:
-			break;
-		case TABLEHEAD:
-			/* print column alignment for XSLT processing if needed */
-			if (scratch->cell_type == 0)
-				print_col_group(out, scratch);
-			scratch->cell_type = 'h';
-			g_string_append_printf(out, "\n<thead>\n");
-			print_html_node_tree(out, n->children, scratch);
-			g_string_append_printf(out, "</thead>\n");
-			scratch->cell_type = 'd';
-			break;
-		case TABLEBODY:
-			g_string_append_printf(out, "\n<tbody>\n");
-			print_html_node_tree(out, n->children, scratch);
-			g_string_append_printf(out, "</tbody>\n");
-			break;
-		case TABLEROW:
-			g_string_append_printf(out, "<tr>\n");
-			scratch->table_column = 0;
-			print_html_node_tree(out, n->children, scratch);
-			g_string_append_printf(out, "</tr>\n");
-			break;
-		case TABLECELL:
-			temp = scratch->table_alignment;
-			if (strncmp(&temp[scratch->table_column],"h",1) == 0) {
-				temp_type = 'h';
-				scratch->table_column++;
-			} else {
-				temp_type = scratch->cell_type;
-			}
-			lev = scratch->table_column;
-			if ( strncmp(&temp[lev],"r",1) == 0) {
-				g_string_append_printf(out, "\t<t%c style=\"text-align:right;\"", temp_type);
-			} else if ( strncmp(&temp[lev],"R",1) == 0) {
-				g_string_append_printf(out, "\t<t%c style=\"text-align:right;\"", temp_type);
-			} else if ( strncmp(&temp[lev],"c",1) == 0) {
-				g_string_append_printf(out, "\t<t%c style=\"text-align:center;\"", temp_type);
-			} else if ( strncmp(&temp[lev],"C",1) == 0) {
-				g_string_append_printf(out, "\t<t%c style=\"text-align:center;\"", temp_type);
-			} else {
-				g_string_append_printf(out, "\t<t%c style=\"text-align:left;\"", temp_type);
-			}
-			if ((n->children != NULL) && (n->children->key == CELLSPAN)) {
-				g_string_append_printf(out, " colspan=\"%d\"",(int)strlen(n->children->str)+1);
-				scratch->table_column += (int)strlen(n->children->str);
-			}
-			g_string_append_printf(out, ">");
-			scratch->padded = 2;
-			print_html_node_tree(out, n->children, scratch);
-			g_string_append_printf(out, "</t%c>\n", temp_type);
-			scratch->table_column++;
-			break;
-		case CELLSPAN:
-			break;
-		case GLOSSARYSOURCE:
-			if (scratch->printing_notes)
-				print_html_node_tree(out, n->children, scratch);
-			break;
-		case CITATIONSOURCE:
-		case NOTESOURCE:
-			if (scratch->printing_notes)
-				print_html_node_tree(out, n->children, scratch);
-			break;
-		case SOURCEBRANCH:
-			fprintf(stderr,"SOURCEBRANCH\n");
-			break;
-		case NOTELABEL:
-		case GLOSSARYLABEL:
-			break;
-		case SUPERSCRIPT:
-			g_string_append_printf(out, "<sup>%s</sup>",n->str);
-			break;
-		case SUBSCRIPT:
-			g_string_append_printf(out, "<sub>%s</sub>",n->str);
-			break;
-		case ABBREVIATION:
-		case KEY_COUNTER:
-			break;
-		case TOC:
-			g_string_append_printf(out, "<div class=\"TOC\">\n");
-			print_html_node_tree(out,n->children, scratch);
-			g_string_append_printf(out, "\n</div>");
-			break;
-		default:
-			fprintf(stderr, "print_html_node encountered unknown node key = %d\n",n->key);
-			exit(EXIT_FAILURE);
-	}
-}
-
-/* print_html_endnotes */
-void print_html_endnotes(GString *out, scratch_pad *scratch) {
-	int counter = 0;
-	int random;
-	node *reversed = copy_node_tree(scratch->used_notes);
-
-	reversed = reverse_list(reversed);
-
-	scratch->printing_notes = 1;
-	
-	node *note = reversed;
-#ifdef DEBUG_ON
-	fprintf(stderr, "start endnotes\n");
-#endif
-	
-	if ((note == NULL) || ((note->key == KEY_COUNTER) && (note->next == NULL))) {
-		free_node_tree(reversed);
-		return;
-	}
-
-#ifdef DEBUG_ON
-	fprintf(stderr, "there are endnotes to print\n");
-#endif
-
-	pad(out,2, scratch);
-	g_string_append_printf(out, "<div class=\"footnotes\">\n<hr />\n<ol>");
-	while ( note != NULL) {
-		if (note->key == KEY_COUNTER) {
-			note = note->next;
-			continue;
-		}
-		
-		counter++;
-		pad(out, 1, scratch);
-		
-		if (scratch->extensions & EXT_RANDOM_FOOT) {
-			srand(scratch->random_seed_base + counter);
-			random = rand() % 99999 + 1;
-		} else {
-			random = counter;
-		}
-		
-		if (note->key == CITATIONSOURCE) {
-			g_string_append_printf(out, "<li id=\"fn:%d\" class=\"citation\"><span class=\"citekey\" style=\"display:none\">%s</span>", 
-				random, note->str);
-		} else {
-			g_string_append_printf(out, "<li id=\"fn:%d\">\n", random);
-		}
-		
-		
-		scratch->padded = 2;
-		if ((note->key == NOTESOURCE) || (note->key == GLOSSARYSOURCE))
-			scratch->footnote_to_print = counter;
-		scratch->footnote_para_counter = tree_contains_key_count(note->children,PARA);
-		print_html_node(out, note, scratch);
-		pad(out, 1, scratch);
-		g_string_append_printf(out, "</li>");
-		
-		note = note->next;
-	}
-	pad(out,1, scratch);
-	g_string_append_printf(out, "</ol>\n</div>\n");
-	scratch->padded = 0;
-
-	free_node_tree(reversed);
-#ifdef DEBUG_ON
-	fprintf(stderr, "finish endnotes\n");
-#endif
-}
-
-/* Check metadata keys and determine if we need a complete document */
-/* We also preconvert metadata keys to proper formatting -- lowercase with no spaces */
-bool is_html_complete_doc(node *meta) {
-	node *step;
-	char *temp;
-	step = meta->children;
-
-	while (step != NULL) {
-		/* process key to proper label */
-		temp = step->str;	/* store pointer to original str */
-		step->str = label_from_string(step->str);
-		free(temp);			/* free original since we don't need it */
-		step = step->next;
-	}
-
-	step = meta->children;
-	while (step != NULL) {
-		/* the following types of metadata do not require a complete document */
-		if ((strcmp(step->str, "baseheaderlevel")  != 0) &&
-			(strcmp(step->str, "xhtmlheaderlevel") != 0) &&
-			(strcmp(step->str, "htmlheaderlevel")  != 0) &&
-			(strcmp(step->str, "latexheaderlevel") != 0) &&
-			(strcmp(step->str, "odfheaderlevel")   != 0) &&
-			(strcmp(step->str, "quoteslanguage")   != 0))
-			{ return TRUE;}
-		step = step->next;
-	}
-
-	return FALSE;
-}
-
-/* print_html_localized_typography -- convert to "smart" typography */
-void print_html_localized_typography(GString *out, int character, scratch_pad *scratch) {
-	if (!extension(EXT_SMART, scratch->extensions)) {
-		g_string_append_c(out, character);
-		return;
-	}
-	switch (character) {
-		case LSQUOTE:
-			switch (scratch->language) {
-				case SWEDISH:
-					g_string_append_printf(out, "&#8217;");
-					break;
-				case FRENCH:
-					g_string_append_printf(out,"&#39;");
-					break;
-				case GERMAN:
-					g_string_append_printf(out,"&#8218;");
-					break;
-				case GERMANGUILL:
-					g_string_append_printf(out,"&#8250;");
-					break;
-				default:
-					g_string_append_printf(out,"&#8216;");
-				}
-			break;
-		case RSQUOTE:
-			switch (scratch->language) {
-				case GERMAN:
-					g_string_append_printf(out,"&#8216;");
-					break;
-				case GERMANGUILL:
-					g_string_append_printf(out,"&#8249;");
-					break;
-				default:
-					g_string_append_printf(out,"&#8217;");
-				}
-			break;
-		case APOS:
-			g_string_append_printf(out,"&#8217;");
-			break;
-		case LDQUOTE:
-			switch (scratch->language) {
-				case DUTCH:
-				case GERMAN:
-					g_string_append_printf(out,"&#8222;");
-					break;
-				case GERMANGUILL:
-					g_string_append_printf(out,"&#187;");
-					break;
-				case FRENCH:
-					g_string_append_printf(out,"&#171;");
-					break;
-				case SWEDISH:
-					g_string_append_printf(out, "&#8221;");
-					break;
-				default:
-					g_string_append_printf(out,"&#8220;");
-				}
-			break;
-		case RDQUOTE:
-			switch (scratch->language) {
-				case SWEDISH:
-				case DUTCH:
-					g_string_append_printf(out,"&#8221;");
-					break;
-				case GERMAN:
-					g_string_append_printf(out,"&#8220;");
-					break;
-				case GERMANGUILL:
-					g_string_append_printf(out,"&#171;");
-					break;
-				case FRENCH:
-					g_string_append_printf(out,"&#187;");
-					break;
-				default:
-					g_string_append_printf(out,"&#8221;");
-				}
-			break;
-		case NDASH:
-			g_string_append_printf(out,"&#8211;");
-			break;
-		case MDASH:
-			g_string_append_printf(out,"&#8212;");
-			break;
-		case ELLIP:
-			g_string_append_printf(out,"&#8230;");
-			break;
-			default:;
-	}
-}
-
-/* print_html_string - print string, escaping for HTML */
-long ran_num_next();	/* Use Knuth's pseudo random generator */
-
-void print_html_string(GString *out, char *str, scratch_pad *scratch) {
-	if (str == NULL)
-		return;
-	while (*str != '\0') {
-		switch (*str) {
-			case '&':
-				g_string_append_printf(out, "&amp;");
-				break;
-			case '<':
-				g_string_append_printf(out, "&lt;");
-				break;
-			case '>':
-				g_string_append_printf(out, "&gt;");
-				break;
-			case '"':
-				g_string_append_printf(out, "&quot;");
-				break;
-			default:
-				if ((scratch->obfuscate == true) && (extension(EXT_OBFUSCATE, scratch->extensions))
-					&& ((int) *str == (((int) *str) & 127))) { 
-						if (ran_num_next() % 2 == 0)
-						g_string_append_printf(out, "&#%d;", (int) *str);
-					else
-						g_string_append_printf(out, "&#x%x;", (unsigned int) *str);
-				} else {
-					g_string_append_c(out, *str);
-				}
-		}
-		str++;
-	}
-}
-
-/* print_col_group - print column alignment config (used in XSLT processing) */
-void print_col_group(GString *out,scratch_pad *scratch) {
-	char *temp;
-	int lev;
-	g_string_append_printf(out, "<colgroup>\n");
-	temp = scratch->table_alignment;
-	for (lev=0;lev<strlen(temp);lev++) {
-		if ( strncmp(&temp[lev],"r",1) == 0) {
-			g_string_append_printf(out, "<col style=\"text-align:right;\"/>\n");
-		} else if ( strncmp(&temp[lev],"R",1) == 0) {
-			g_string_append_printf(out, "<col style=\"text-align:right;\" class=\"extended\"/>\n");
-		} else if ( strncmp(&temp[lev],"c",1) == 0) {
-			g_string_append_printf(out, "<col style=\"text-align:center;\"/>\n");
-		} else if ( strncmp(&temp[lev],"C",1) == 0) {
-			g_string_append_printf(out, "<col style=\"text-align:center;\" class=\"extended\"/>\n");
-		} else if ( strncmp(&temp[lev],"L",1) == 0) {
-			g_string_append_printf(out, "<col style=\"text-align:left;\" class=\"extended\"/>\n");
-		} else {
-			g_string_append_printf(out, "<col style=\"text-align:left;\"/>\n");
-		}
-	}
-	g_string_append_printf(out, "</colgroup>\n");
-}