Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
devel:kanku:perl
perl-Devel-Cycle
Devel-Cycle-pm.patch
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File Devel-Cycle-pm.patch of Package perl-Devel-Cycle
--- lib/Devel/Cycle.old 2009-08-24 08:54:45.000000000 -0400 +++ lib/Devel/Cycle.pm 2010-04-16 20:53:30.000000000 -0400 @@ -215,7 +215,7 @@ sub _get_type { my $thingy = shift; return unless ref $thingy; - return 'SCALAR' if UNIVERSAL::isa($thingy,'SCALAR') || UNIVERSAL::isa($thingy,'REF'); + return 'SCALAR' if UNIVERSAL::isa($thingy,'SCALAR') || UNIVERSAL::isa($thingy,'REF') || UNIVERSAL::isa($thingy,'Regexp'); return 'ARRAY' if UNIVERSAL::isa($thingy,'ARRAY'); return 'HASH' if UNIVERSAL::isa($thingy,'HASH'); return 'CODE' if UNIVERSAL::isa($thingy,'CODE');
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor