diff options
author | Stefano Lattarini <stefano.lattarini@gmail.com> | 2013-02-04 23:37:23 +0100 |
---|---|---|
committer | Stefano Lattarini <stefano.lattarini@gmail.com> | 2013-02-13 17:46:50 +0100 |
commit | e7b9d315e6bcb3a3c86042dc5fd58e6f4461ed2d (patch) | |
tree | 636fc8fd3f8e4c2c48f8d75155e77aa656084236 /lib/Automake/Language.pm | |
parent | 283ded7f5b9b7ad97300293cd65f3f1b48c21115 (diff) | |
download | automake-e7b9d315e6bcb3a3c86042dc5fd58e6f4461ed2d.tar.gz |
maint: use more perl subroutines prototypes in the automake script
* automake.in: Throughout this file. Note that these new prototypes
are not much useful, since many subroutine calls still use the old
'&foo' form; but we'll take care of that in later patches.
* lib/Automake/Language.pm (target_hook): Call the '_target_hook'
of the given language in a more modern form, avoiding '&'.
Signed-off-by: Stefano Lattarini <stefano.lattarini@gmail.com>
Diffstat (limited to 'lib/Automake/Language.pm')
-rw-r--r-- | lib/Automake/Language.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Automake/Language.pm b/lib/Automake/Language.pm index 6408e86d0..a678e1e4d 100644 --- a/lib/Automake/Language.pm +++ b/lib/Automake/Language.pm @@ -98,7 +98,7 @@ sub target_hook ($$$$%) my ($self) = @_; if (defined $self->_target_hook) { - &{$self->_target_hook} (@_); + $self->_target_hook->(@_); } } |