From 821581b3e5584bd11fe221848f067478f57e8133 Mon Sep 17 00:00:00 2001
From: Alex 'AdUser' Z <ad_user@runbox.com>
Date: Tue, 14 Jul 2015 23:06:14 +1000
Subject: [PATCH] + add <codeblock> handler

---
 lib/Text/Dokuwiki/Render/Markdown.pm | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/lib/Text/Dokuwiki/Render/Markdown.pm b/lib/Text/Dokuwiki/Render/Markdown.pm
index 93aeefa..b73f2e3 100644
--- a/lib/Text/Dokuwiki/Render/Markdown.pm
+++ b/lib/Text/Dokuwiki/Render/Markdown.pm
@@ -104,4 +104,17 @@ sub pre {
   return join("\n", @lines);
 }
 
+sub codeblock {
+  my ($self, $attrs, $content) = @_;
+
+  my $out;
+  $out = "```";
+  $out .= $attrs->{syntax} if $attrs->{syntax};
+  $out .= "\n";
+  $out .= $content . "\n";
+  $out .= "```\n";
+
+  return $out;
+}
+
 1;