SPECS: perl-Hook-WrapSub.spec - pl, URL, md5, missing dir
qboosh
qboosh at pld-linux.org
Mon Nov 6 22:32:10 CET 2006
Author: qboosh Date: Mon Nov 6 21:32:10 2006 GMT
Module: SPECS Tag: HEAD
---- Log message:
- pl, URL, md5, missing dir
---- Files affected:
SPECS:
perl-Hook-WrapSub.spec (1.1 -> 1.2)
---- Diffs:
================================================================
Index: SPECS/perl-Hook-WrapSub.spec
diff -u SPECS/perl-Hook-WrapSub.spec:1.1 SPECS/perl-Hook-WrapSub.spec:1.2
--- SPECS/perl-Hook-WrapSub.spec:1.1 Thu Nov 2 14:49:03 2006
+++ SPECS/perl-Hook-WrapSub.spec Mon Nov 6 22:32:05 2006
@@ -4,44 +4,55 @@
%bcond_without tests # do not perform "make test"
#
%include /usr/lib/rpm/macros.perl
-%define pdir Hook
-%define pnam WrapSub
+%define pdir Hook
+%define pnam WrapSub
Summary: Hook::WrapSub - wrap subs with pre- and post-call hooks
-#Summary(pl):
+Summary(pl): Hook::WrapSub - obudowanie procedur w wywołania przed i po wywołaniu
Name: perl-Hook-WrapSub
Version: 0.03
Release: 0.1
# same as perl
License: GPL v1+ or Artistic
Group: Development/Languages/Perl
-Source0: http://www.cpan.org/modules/by-module/%{pdir}/%{pdir}-%{pnam}-%{version}.tar.gz
+Source0: http://www.cpan.org/modules/by-module/Hook/%{pdir}-%{pnam}-%{version}.tar.gz
+# Source0-md5: 7a5e42aca06d6ba06dcbd5e2cb5769bf
+URL: http://search.cpan.org/dist/Hook-WrapSub/
BuildRequires: perl-devel >= 1:5.8.0
BuildRequires: rpm-perlprov >= 4.1-13
-%if %{with tests}
-%endif
BuildArch: noarch
BuildRoot: %{tmpdir}/%{name}-%{version}-root-%(id -u -n)
%description
-This function enables intercepting a call to any named
-function; handlers may be added both before and after
-the call to the intercepted function.
+This function enables intercepting a call to any named function;
+handlers may be added both before and after the call to the
+intercepted function.
For example:
wrap_subs \&before, 'some_func', \&after;
-In this case, whenever the sub named 'some_func' is called,
-the &before sub is called first, and the &after sub is called
-afterwards. These are both optional. If you only want
-to intercept the call beforehand:
+In this case, whenever the sub named 'some_func' is called, the
+&before sub is called first, and the &after sub is called afterwards.
+These are both optional. If you only want to intercept the call
+beforehand:
wrap_subs \&before, 'some_func';
+%description -l pl
+Ta funkcja umożliwia przechwytywanie wywołania dowolnej nazwanej
+funkcji; można dodać procedury obsługi zarówno przed jak i po
+wywołaniu przechwytywanej funkcji.
+Na przykład:
-# %description -l pl
-# TODO
+ wrap_subs \&przed, 'jakas_funkcja', \&po
+
+W tym przypadku, kiedy wywoływana jest 'jakas_funkcja', najpierw
+wywoływana jest procedura &przed, a procedura &po jest wywoływana po
+powrocie. Obie są opcjonalne. Aby przechwycić tylko punkt przed
+wywołaniem można użyć:
+
+ wrap_subs \&przed, 'jakas_funkcja';
%prep
%setup -q -n %{pdir}-%{pnam}-%{version}
@@ -65,6 +76,7 @@
%files
%defattr(644,root,root,755)
%doc Changes README
+%dir %{perl_vendorlib}/Hook
%{perl_vendorlib}/Hook/*.pm
%{_mandir}/man3/*
@@ -74,6 +86,8 @@
All persons listed below can be reached at <cvs_login>@pld-linux.org
$Log$
+Revision 1.2 2006/11/06 21:32:05 qboosh
+- pl, URL, md5, missing dir
+
Revision 1.1 2006/11/02 13:49:03 mguevara
- initial
-
================================================================
---- CVS-web:
http://cvs.pld-linux.org/SPECS/perl-Hook-WrapSub.spec?r1=1.1&r2=1.2&f=u
More information about the pld-cvs-commit
mailing list