File perl-UNIVERSAL-can.spec of Package perl-UNIVERSAL-can

Overview Repositories Revisions Requests Users Attributes Meta

File perl-UNIVERSAL-can.spec of Package perl-UNIVERSAL-can (Revision 771683751122240f375d421fd8cab698)

Currently displaying revision 771683751122240f375d421fd8cab698 , Show latest

# norootforbuild

Name:           perl-UNIVERSAL-can
Version:        1.16
Release:        0
Summary:        Hack around people calling UNIVERSAL::can() as a function
Source:         http://search.cpan.org/CPAN/authors/id/C/CH/CHROMATIC/UNIVERSAL-can-%{version}.tar.gz
URL:            http://search.cpan.org/dist/UNIVERSAL-can/
Group:          Development/Libraries/Perl
License:        Perl License
BuildRoot:      %{_tmppath}/build-%{name}-%{version}
%{perl_requires}
BuildRequires:  make perl perl(Module::Build)

%description
The UNIVERSAL class provides a few default methods so that all objects can use
them. Object orientation allows programmers to override these methods in
subclasses to provide more specific and appropriate behavior.

Some authors call methods in the UNIVERSAL class on potential invocants as
functions, bypassing any possible overriding. This is wrong and you should not
do it. Unfortunately, not everyone heeds this warning and their bad code can
break your good code.

This module replaces UNIVERSAL::can() with a method that checks to see if the
first argument is a valid invocant has its own can() method. If so, it gives a
warning and calls the overridden method, working around buggy code. Otherwise,
everything works as you might expect.

%prep
%setup -q -n "UNIVERSAL-can-%{version}"

%build
%__perl ./Build.PL
./Build

%install
./Build pure_install --destdir "%{buildroot}" --installdirs vendor                                                                      
%perl_process_packlist

%check
./Build test

%clean
%__rm -rf "%{buildroot}"

%files
%defattr(-,root,root)
%doc Changes README
%dir %{perl_vendorlib}/UNIVERSAL
%{perl_vendorlib}/UNIVERSAL/can.pm
%dir %{perl_vendorarch}/auto/UNIVERSAL
%{perl_vendorarch}/auto/UNIVERSAL/can
%doc %{perl_man3dir}/UNIVERSAL::can.%{perl_man3ext}%{ext_man}

%changelog
# vim: set sw=4 ts=4 et nu:

Places

File perl-UNIVERSAL-can.spec of Package perl-UNIVERSAL-can (Revision 771683751122240f375d421fd8cab698)

Places