From 989a0137df8f8e11df67de1a2ded73712b46a8fd Mon Sep 17 00:00:00 2001
From: Filipe Alves <filipe.alves@bithium.com>
Date: Thu, 14 Jul 2016 10:27:47 +0100
Subject: Add section title to output.

---
 src/perlmodgen.cpp | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/perlmodgen.cpp b/src/perlmodgen.cpp
index 8d425a5..c7d562f 100644
--- a/src/perlmodgen.cpp
+++ b/src/perlmodgen.cpp
@@ -905,6 +905,7 @@ void PerlModDocVisitor::visitPre(DocSection *s)
 {
   QCString sect = QCString().sprintf("sect%d",s->level());
   openItem(sect);
+  m_output.addFieldQuotedString("title", s->title());
   openSubBlock("content");
 }
 
-- 
cgit v0.12