From: Sergey Matveev <stargrave@stargrave.org>
Date: Tue, 13 Oct 2020 10:28:33 +0000 (+0300)
Subject: Allow indentation of @DOCSTRING@
X-Git-Url: http://www.git.stargrave.org/?p=dotfiles.git;a=commitdiff_plain;h=80a027c326192db6a29e2307ea4c33e89a446372

Allow indentation of @DOCSTRING@
---

diff --git a/bin/bin/docstringer.pl b/bin/bin/docstringer.pl
index e9dcf7b..95def27 100755
--- a/bin/bin/docstringer.pl
+++ b/bin/bin/docstringer.pl
@@ -69,7 +69,7 @@ foreach my $fn (readdir $dir) {
     open(my $dst, ">:encoding(UTF-8)", "$docBuildDir/$fn") or
         die "can not open $docBuildDir/$fn";
     while(<$src>) {
-        ( print($dst $_) and next ) unless /^\@DOCSTRING (.*)\@$/;
+        ( print($dst $_) and next ) unless /^\s*\@DOCSTRING (.*)\@$/;
         print "\t$fn: $1\n" if $verbose;
         die "unable to find docstring: $1" unless defined $docstrings{$1};
         print $dst $docstrings{$1};