From 94277e2bc1c458e945f9166b43f0468a0990dcde Mon Sep 17 00:00:00 2001
From: KOUCHANG <grasshopper.like.ant@gmail.com>
Date: Thu, 27 Aug 2015 04:32:01 +0900
Subject: [PATCH] fix unicode support

---
 src/edown_doclet.erl | 2 +-
 src/edown_xmerl.erl  | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/edown_doclet.erl b/src/edown_doclet.erl
index a81f314..13079b7 100644
--- a/src/edown_doclet.erl
+++ b/src/edown_doclet.erl
@@ -193,7 +193,7 @@ redirect_href(Attrs, Branch, BaseHRef, Target) ->
 	#xmlAttribute{value = "/" ++ _} ->
 	    false;
 	#xmlAttribute{value = Href} = A ->
-	    case re:run(Href, ":", []) of
+	    case re:run(Href, ":", [unicode]) of
 		{match, _} ->
 		    false;
 		nomatch ->
diff --git a/src/edown_xmerl.erl b/src/edown_xmerl.erl
index abd8729..ee5a1bc 100644
--- a/src/edown_xmerl.erl
+++ b/src/edown_xmerl.erl
@@ -205,7 +205,7 @@ md_elem(Tag, Data, Attrs, Parents, E) ->
 	code  ->
 	    %% edoc_macros.erl hard-codes expansion of the {@type ...} macro
 	    %% as a HTML href inside <code>...</code>
-	    case re:run(Data, "<a href=", []) of
+	    case re:run(Data, "<a href=", [unicode]) of
 		{match,_} ->
 		    %% ["<code>", no_nl(Data), "</code>"];
 		    ["<code>", no_nl(Data), "</code>"];
@@ -266,7 +266,7 @@ no_nl(S) ->
 		       C =/= $\n], both).
 
 replace_edown_p(Data) ->
-    Data1 = binary_to_list(iolist_to_binary(Data)),
+    Data1 = unicode:characters_to_list([Data]),
     replace_edown_p(Data1, []).
 
 replace_edown_p("<edown_p>" ++ Data, Acc) ->
-- 
GitLab