1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
Source: libsub-wrappackages-perl
Section: perl
Priority: optional
Build-Depends: debhelper (>= 5.0.0)
Build-Depends-Indep: perl (>= 5.8.0-7), libhook-lexwrap-perl (>= 0.2)
Maintainer: Debian Perl Group <pkg-perl-maintainers@lists.alioth.debian.org>
Uploaders: Jaldhar H. Vyas <jaldhar@debian.org>
Standards-Version: 3.7.3
Homepage: http://search.cpan.org/dist/Sub-WrapPackages/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libsub-wrappackages-perl/
Vcs-Browser: http://svn.debian.org/wsvn/pkg-perl/trunk/libsub-wrappackages-perl/
Package: libsub-wrappackages-perl
Architecture: all
Depends: ${perl:Depends}, ${misc:Depends}, libhook-lexwrap-perl (>= 0.2)
Description: add wrappers around subroutines in packages
This is mostly a wrapper around Damian Conway’s Hook::LexWrap module
The differences are:
* no exporting
We don’t export a wrap() function, instead preferring to do all the
magic when you "use" this module. We just wrap named subroutines,
no references.
* the subs and packages arrayrefs
Any subroutine mentioned in the "subs" parameter will be wrapped.
Any packages mentioned in the "packages" parameter will have all their
subroutines wrapped.
* wrap_inherited
In conjunction with the "packages" arrayref, this wraps all calls
to inherited methods made through those packages. If you call
those methods directly in the superclass then they are not
affected.
* parameters passed to your subs
Your pre-wrapper will be passed the wrapped subroutine’s name, and all the
parameters to be passed to it.
|
