Bug#836832: libstring-copyright-perl: please parse "copyright (c) 2106..." statement

[Jonas Smedegaard]

Quoting Dominique Dumont (2016-09-06 13:45:15)
> String::Copyright fails to extract copyright from the following
> statement (from Jira::Client::Automated):
> 
> 
> This software is copyright (c) 2016 by Polyvore, Inc.
> 
> This is free software; you can redistribute it and/or modify it under
> the same terms as the Perl 5 programming language system itself.
> 
> 
> Note that String::Copyright knows how to parse statements beginning with
> "(c) copyright", but fails when they are reversed (i.e. "copyright (c)")
> 
> Could you tweak String::Copyright to parse this alternative ?

I fail to reproduce this bug.

The following succeeds for me:

use utf8;
use Test::More tests => 2;
use String::Copyright;

is copyright('This software is copyright (c) 2016 by Polyvore, Inc.'),
	'© 2016 Polyvore, Inc.', 'sign pseudosign intro';
is copyright('This software is (c) copyright 2016 by Polyvore, Inc.'),
	'© 2016 Polyvore, Inc.', 'pseudosign sign intro';


Did I misinterpret your issue somehow?  Can you try run that exact same 
test, or perhaps provide a similarly written test that fails for you?


 - Jonas

-- 
 * Jonas Smedegaard - idealist & Internet-arkitekt
 * Tlf.: +45 40843136  Website: http://dr.jones.dk/

 [x] quote me freely  [ ] ask before reusing  [ ] keep private
-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 801 bytes
Desc: signature
URL: <http://lists.alioth.debian.org/pipermail/pkg-perl-maintainers/attachments/20160907/b4985c21/attachment-0001.sig>