From 9f8a08a64409bbf07d8ba158c0e699b2b3a3262d Mon Sep 17 00:00:00 2001
From: iska <iska.gp@gmail.com>
Date: Sun, 1 Mar 2015 23:52:05 +0100
Subject: [PATCH] Fix head-element insertion in before-head mode

---
 HTMLKit/HTMLParser.m | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/HTMLKit/HTMLParser.m b/HTMLKit/HTMLParser.m
index 190190c..3b84a5a 100644
--- a/HTMLKit/HTMLParser.m
+++ b/HTMLKit/HTMLParser.m
@@ -508,7 +508,7 @@
 			if ([token.asStartTagToken.tagName isEqualToString:@"html"]) {
 				[self HTMLInsertionModeInBody:token];
 			} else if ([token.asStartTagToken.tagName isEqualToString:@"head"]) {
-				HTMLElement *head = [[HTMLElement alloc] initWithTagName:@"head"];
+				HTMLElement *head = [self insertElementForToken:token.asTagToken];
 				_headElementPointer = head;
 				[self switchInsertionMode:HTMLInsertionModeInHead];
 			}