diff options
Diffstat (limited to 'tools/pm/Common/SectionManager.pm')
| -rw-r--r-- | tools/pm/Common/SectionManager.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tools/pm/Common/SectionManager.pm b/tools/pm/Common/SectionManager.pm index d1608205..88d33b58 100644 --- a/tools/pm/Common/SectionManager.pm +++ b/tools/pm/Common/SectionManager.pm @@ -38,7 +38,7 @@ use constant # TODO: get wrapparser? -sub _get_header () +sub _get_header { my @code = ( @@ -50,7 +50,7 @@ sub _get_header () return join "\n", @code; } -sub _get_header_guard ($$) +sub _get_header_guard { my ($self, $suffix) = @_; my $base = $self->_get_base; @@ -62,7 +62,7 @@ sub _get_header_guard ($$) return join '_', '', (uc $mm_module), (uc $base), $suffix, ''; } -sub _prepare_h_section ($) +sub _prepare_h_section { my ($self) = @_; my $header_guard = $self->_get_header_guard ('H'); |