svn commit: r361577 - in head/devel/p5-JSON-Schema: . files

[Ryan Steinmetz]

Author: zi
Date: Fri Jul 11 18:27:00 2014
New Revision: 361577
URL: http://svnweb.freebsd.org/changeset/ports/361577
QAT: https://qat.redports.org/buildarchive/r361577/

Log:
  - Merge in upstream fix: https://rt.cpan.org/Public/Bug/Display.html?ShowHeaders=1;id=94259
  
  PR:		190088
  Submitted by:	awalker at sourcefire.com
  Approved by:	maintainer timeout (1 month+)

Added:
  head/devel/p5-JSON-Schema/files/
  head/devel/p5-JSON-Schema/files/patch-lib__JSON__Schema__Helper.pm   (contents, props changed)
Modified:
  head/devel/p5-JSON-Schema/Makefile

Modified: head/devel/p5-JSON-Schema/Makefile
==============================================================================
--- head/devel/p5-JSON-Schema/Makefile	Fri Jul 11 18:17:57 2014	(r361576)
+++ head/devel/p5-JSON-Schema/Makefile	Fri Jul 11 18:27:00 2014	(r361577)
@@ -3,7 +3,7 @@
 
 PORTNAME=	JSON-Schema
 PORTVERSION=	0.015
-PORTREVISION=	1
+PORTREVISION=	2
 CATEGORIES=	devel perl5
 MASTER_SITES=	CPAN
 PKGNAMEPREFIX=	p5-

Added: head/devel/p5-JSON-Schema/files/patch-lib__JSON__Schema__Helper.pm
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/devel/p5-JSON-Schema/files/patch-lib__JSON__Schema__Helper.pm	Fri Jul 11 18:27:00 2014	(r361577)
@@ -0,0 +1,32 @@
+--- ./lib/JSON/Schema/Helper.pm.orig	2014-05-21 15:43:01.000000000 -0400
++++ ./lib/JSON/Schema/Helper.pm	2014-05-21 15:49:17.000000000 -0400
+@@ -308,12 +308,12 @@
+ 				if ((defined $schema->{'minimumCanEqual'} and not $schema->{'minimumCanEqual'})
+ 				or  $schema->{'exclusiveMinimum'})
+ 				{
+-					$addError->("must be greater than minimum value '" . $schema->{'minimum'}) . "'"
++					$addError->("must be greater than minimum value '" . $schema->{'minimum'} . "'")
+ 						if $value lt $schema->{'minimum'};
+ 				}
+ 				else
+ 				{
+-					$addError->("must be greater than or equal to minimum value '" . $schema->{'minimum'}) . "'"
++					$addError->("must be greater than or equal to minimum value '" . $schema->{'minimum'} . "'")
+ 						if $value le $schema->{'minimum'};
+ 				}
+ 			}
+@@ -336,12 +336,12 @@
+ 				if ((defined $schema->{'maximumCanEqual'} and not $schema->{'maximumCanEqual'})
+ 				or  $schema->{'exclusiveMaximum'})
+ 				{
+-					$addError->("must be less than or equal to maximum value '" . $schema->{'maximum'}) . "'"
++					$addError->("must be less than or equal to maximum value '" . $schema->{'maximum'} . "'")
+ 						if $value gt $schema->{'maximum'};
+ 				}
+ 				else
+ 				{
+-					$addError->("must be less than or equal to maximum value '" . $schema->{'maximum'}) . "'"
++					$addError->("must be less than or equal to maximum value '" . $schema->{'maximum'} . "'")
+ 						if $value ge $schema->{'maximum'};
+ 				}
+ 			}