From 83d7271afccf1c12b8f7566ef25a03bcd14774c7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Beno=C3=AEt=20Minisini?= <gambas@users.sourceforge.net>
Date: Sat, 22 Feb 2014 00:42:03 +0000
Subject: [PATCH] [GB.MARKDOWN] * BUG: Fix markup mismatch detection.

git-svn-id: svn://localhost/gambas/trunk@6172 867c0c6c-44f3-4631-809d-bfa615b0a4ec
---
 comp/src/gb.markdown/.src/Markup.module | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/comp/src/gb.markdown/.src/Markup.module b/comp/src/gb.markdown/.src/Markup.module
index 3ed552cd4..5f552a808 100644
--- a/comp/src/gb.markdown/.src/Markup.module
+++ b/comp/src/gb.markdown/.src/Markup.module
@@ -675,7 +675,7 @@ ENTER_MARKUP:
     If Not ["img", "hr", "br"].Exist(sPattern) Then 
       If $aMarkup.Count = 0 Then
         Error.Raise("Mismatched markup: </" & sPattern & ">")
-      Else If LCase($aMarkup[$aMarkup.Max]) <> LCase(Mid$(sPattern, 2)) Then
+      Else If LCase($aMarkup[$aMarkup.Max]) <> LCase(sPattern) Then
         Error.Raise("Mismatched markup: </" & sPattern & "> against <" & $aMarkup[$aMarkup.Max] & ">")
       Endif
       sResult &= "</" & sPattern & ">"