From 856480f14b3eb87c9f4d9e0b900a1a4b048b32c9 Mon Sep 17 00:00:00 2001
From: Zubrikhin Alexey <zubrihin@v-lazer.com>
Date: Mon, 13 Apr 2015 10:21:58 +1000
Subject: [PATCH] + block quotes

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

diff --git a/lib/Text/Dokuwiki.pm b/lib/Text/Dokuwiki.pm
index 0618078..24f8c20 100644
--- a/lib/Text/Dokuwiki.pm
+++ b/lib/Text/Dokuwiki.pm
@@ -76,6 +76,12 @@ sub parse {
         push @{ $buf }, [li => {}, 0 => $2];
         next;
       }
+      # quotes
+      when (m/^\s?(>)+\s*(.+)/o) {
+        my $level = $1 =~ tr/>/>/;
+        push @{ $tree }, [blockquote => {level => $level}, 0 => $2];
+        next;
+      }
       # table
       when (m/^\s?[\|\^]/o) {
         $mode = 'table';