This has been done with the following perl one-liner:
,---
perl -p -i -E 'if (m/->table\("([^"]*)"\)/) { $table = $1 };\
if (m/^=head1 COMPON/) { print "=head1 DESCRIPTION\n\n\
This module is a schema class for the NGCP database table \"$table\".\n\n" };'
`---
Change-Id: I030d073754f6622f66c8169c1a0cf4187462052e
changes/50/16650/3
parent
34ab96b569
commit
354976a4d6
Loading…
Reference in new issue