Commit 16de3f97 authored by Leigh B. Stoller's avatar Leigh B. Stoller

Default to maximum 90 days for slice renewal.

parent ef2e97ec
#!/usr/bin/perl -wT
#
# GENIPUBLIC-COPYRIGHT
# Copyright (c) 2008-2009 University of Utah and the Flux Group.
# Copyright (c) 2008-2010 University of Utah and the Flux Group.
# All rights reserved.
#
package GeniSA;
......@@ -464,7 +464,7 @@ sub Register($)
#
my $diff = $when - time();
if ($diff < (60 * 5) || $diff > (3600 * 24 * 30)) {
if ($diff < (60 * 5) || $diff > (3600 * 24 * 90)) {
$message = "valid_until out of range";
goto bad;
}
......@@ -963,7 +963,7 @@ sub RenewSlice($)
#
my $diff = $when - time();
if ($diff < (60 * 5) || $diff > (3600 * 24 * 30)) {
if ($diff < (60 * 5) || $diff > (3600 * 24 * 90)) {
$message = "expiration out of range";
goto bad;
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment