mirror of
https://git.FreeBSD.org/ports.git
synced 2024-11-24 00:45:52 +00:00
- Merge in upstream fix: https://rt.cpan.org/Public/Bug/Display.html?ShowHeaders=1;id=94259
PR: 190088 Submitted by: awalker@sourcefire.com Approved by: maintainer timeout (1 month+)
This commit is contained in:
parent
0fce0da47d
commit
bc5f070b87
Notes:
svn2git
2021-03-31 03:12:20 +00:00
svn path=/head/; revision=361577
@ -3,7 +3,7 @@
|
||||
|
||||
PORTNAME= JSON-Schema
|
||||
PORTVERSION= 0.015
|
||||
PORTREVISION= 1
|
||||
PORTREVISION= 2
|
||||
CATEGORIES= devel perl5
|
||||
MASTER_SITES= CPAN
|
||||
PKGNAMEPREFIX= p5-
|
||||
|
@ -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'};
|
||||
}
|
||||
}
|
Loading…
Reference in New Issue
Block a user