Skip Menu |
 

This queue is for tickets about the AnyEvent-Subprocess CPAN distribution.

Report information
The Basics
Id: 109573
Status: new
Priority: 0/
Queue: AnyEvent-Subprocess

People
Owner: Nobody in particular
Requestors: jsw [...] inconcepts.biz
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: warning about enum syntax; one-line patch included
Date: Tue, 24 Nov 2015 08:01:52 -0500
To: bug-AnyEvent-Subprocess [...] rt.cpan.org
From: Jeff Wheeler <jsw [...] inconcepts.biz>
Download (untitled) / with headers
text/plain 2.3k
use AnyEvent::Subprocess produces a warning about improper enum syntax (follows.) A one-line patch appears to resolve this (directly below.) # diff Types.pm.orig Types.pm 42c42 < enum WhenToCallBack, qw/Readable Line/; --- Show quoted text
> enum WhenToCallBack, [qw/Readable Line/];
root@husker:/usr/local/share/perl/5.18.2/AnyEvent/Subprocess# diff -up Types.pm.orig Types.pm --- Types.pm.orig 2015-11-24 07:54:37.107078755 -0500 +++ Types.pm 2015-11-24 07:54:57.359078392 -0500 @@ -39,7 +39,7 @@ coerce SubprocessCode, from ArrayRef[Str subtype CodeList, as ArrayRef[CodeRef]; coerce CodeList, from CodeRef, via { [$_] }; -enum WhenToCallBack, qw/Readable Line/; +enum WhenToCallBack, [qw/Readable Line/]; 1; $ perl -cw bin/nftDecider2.p5 Passing a list of values to enum is deprecated. Enum values should be wrapped in an arrayref. at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/Types.pm line 42. require AnyEvent/Subprocess/Types.pm called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/Job/Delegate/Handle.pm line 12 AnyEvent::Subprocess::Job::Delegate::Handle::BEGIN() called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/Types.pm line 0 eval {...} called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/Types.pm line 0 require AnyEvent/Subprocess/Job/Delegate/Handle.pm called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/DefaultDelegates.pm line 16 AnyEvent::Subprocess::DefaultDelegates::BEGIN() called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/Types.pm line 0 eval {...} called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/Types.pm line 0 require AnyEvent/Subprocess/DefaultDelegates.pm called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess.pm line 11 AnyEvent::Subprocess::BEGIN() called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/Types.pm line 0 eval {...} called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/Types.pm line 0 require AnyEvent/Subprocess.pm called at bin/nftDecider2.p5 line 5 main::BEGIN() called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/Types.pm line 0 eval {...} called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/Types.pm line 0 bin/nftDecider2.p5 syntax OK $ perl -v This is perl 5, version 18, subversion 2 (v5.18.2) built for x86_64-linux-gnu-thread-multi (with 41 registered patches, see perl -V for more detail) -- Jeff S Wheeler <jsw@inconcepts.biz> Sr Network Operator / Innovative Network Concepts


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.