Add support for Perl files (pm)

ivjose · Jul 9, 2014 · 4fe7280 · 4fe7280
1 parent e591c6b
commit 4fe7280
Show file tree

Hide file tree

Showing 3 changed files with 9 additions and 2 deletions.
diff --git a/bin/apidoc b/bin/apidoc
@@ -19,7 +19,7 @@ var argv = optimist
 
 	.option("f", {
 		alias: "file-filters",
-		"default": ".*\\.(coffee|cs|dart|erl|go|java|js|php?|py|rb|ts)$",
+		"default": ".*\\.(coffee|cs|dart|erl|go|java|js|php?|py|rb|ts|pm)$",
 		describe: "RegEx-Filter to select files that should be parsed (multiple -f can be used)."
 	})
 

diff --git a/lib/apidoc.js b/lib/apidoc.js
@@ -13,7 +13,7 @@ var fs = require("fs-extra");
 // Options
 var _defaultOptions = {
 	excludeFilters: [],
-	includeFilters: [ ".*\\.(coffee|cs|dart|erl|go|java|js|php?|py|rb|ts)$" ],
+	includeFilters: [ ".*\\.(coffee|cs|dart|erl|go|java|js|php?|py|rb|ts|pm)$" ],
 
 	src: path.join(__dirname, "../example/"),
 	dest: path.join(__dirname, "../doc/"),

diff --git a/lib/parser.js b/lib/parser.js
@@ -304,6 +304,13 @@ Parser.prototype._findBlocks = function()
 			inlineRegExp = /^(\t+)?[ ]?/gm;
 			break;
 
+        case ".pm":
+            // Find document blocks between "#**" and "#**"
+            docBlocksRegExp = /#\*\*\uffff?(.+?)#\*\*/g;
+            // Remove not needed " # " and "	" (tabs) at the beginning
+            inlineRegExp = /^(\s+)?(#)[ ]?/gm;
+            break;
+
 		default:
 			// Find document blocks between "/**" and "*/"
 			docBlocksRegExp = /\/\*\*\uffff?(.+?)\*\//g;