File perl-Log-Any-IfLOG.spec of Package perl-Log-Any-IfLOG

Overview Repositories Revisions Requests Users Attributes Meta

File perl-Log-Any-IfLOG.spec of Package perl-Log-Any-IfLOG (Revision 03c5768f3aec704bee55e8d7b0e654ec)

Currently displaying revision 03c5768f3aec704bee55e8d7b0e654ec , Show latest

#
# spec file for package perl-Log-Any-IfLOG
#
# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
# upon. The license for this file, and modifications and additions to the
# file, is the same license as for the pristine package itself (unless the
# license for the pristine package is not an Open Source License, in which
# case the license is the MIT License). An "Open Source License" is a
# license that conforms to the Open Source Definition (Version 1.9)
# published by the Open Source Initiative.

# Please submit bugfixes or comments via http://bugs.opensuse.org/
#

Name:           perl-Log-Any-IfLOG
Version:        0.07
Release:        0
%define cpan_name Log-Any-IfLOG
Summary:        Load Log::Any only if "logging is enabled"
License:        Artistic-1.0 or GPL-1.0+
Group:          Development/Libraries/Perl
Url:            http://search.cpan.org/dist/Log-Any-IfLOG/
Source0:        http://www.cpan.org/authors/id/P/PE/PERLANCAR/%{cpan_name}-%{version}.tar.gz
Source1:        cpanspec.yml
BuildArch:      noarch
BuildRoot:      %{_tmppath}/%{name}-%{version}-build
BuildRequires:  perl
BuildRequires:  perl-macros
BuildRequires:  perl(Log::Any)
Requires:       perl(Log::Any)
%{perl_requires}

%description
This module is a drop-in replacement/wrapper for the Log::Any manpage to be
used from your modules. This is a quick-hack solution to avoid the cost of
loading Log::Any under "normal condition". Since Log::Any 1.00, startup
overhead increases to about 7-10ms on my PC/laptop (from under 1ms for the
previous version). Because I want to keep startup overhead of CLI apps
under 50ms (see the Perinci::CmdLine::Lite manpage) to keep tab completion
from getting a noticeable lag, every millisecond counts.

This module will only load the Log::Any manpage when "logging is enabled".
Otherwise, it will just return without loading anything. If '$log' is
requested in import, a fake object is returned that responds to methods
like 'debug', 'is_debug' and so on but will do nothing when called and just
return 0.

To determine "logging is enabled":

* * Is $ENABLE_LOG defined?

This package variable can be used to force "logging enabled" (if true) or
  "logging disabled" (if false). Normally, you don't need to do this except
  for testing.

* * Is Log::Any is already loaded (from %INC)?

If Log::Any is already loaded, it means we have taken the overhead hit
  anyway so logging is enabled.

* * Is one of log-related environment variables true?

If one of the LOG manpage, 'TRACE', or 'DEBUG', or 'VERBOSE', or 'QUIET',
  or 'LOG_LEVEL' is true then logging is enabled. These variables are used
  by the Perinci::CmdLine manpage.

Otherwise, logging is disabled.

%prep
%setup -q -n %{cpan_name}-%{version}

%build
%{__perl} Makefile.PL INSTALLDIRS=vendor
%{__make} %{?_smp_mflags}

%check
%{__make} test

%install
%perl_make_install
%perl_process_packlist
%perl_gen_filelist

%files -f %{name}.files
%defattr(-,root,root,755)
%doc Changes LICENSE README

%changelog

Places

File perl-Log-Any-IfLOG.spec of Package perl-Log-Any-IfLOG (Revision 03c5768f3aec704bee55e8d7b0e654ec)

Places