[ARVADOS] updated: 3690225e29161191cc5daabe4a335a0ec5737d3d
git at public.curoverse.com
git at public.curoverse.com
Fri Mar 14 15:13:28 EDT 2014
Summary of changes:
sdk/cli/bin/crunch-job | 59 ------------------------------------------------
1 files changed, 0 insertions(+), 59 deletions(-)
via 3690225e29161191cc5daabe4a335a0ec5737d3d (commit)
from e3c95c76496fe399ef145990114eb83918e10dac (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
commit 3690225e29161191cc5daabe4a335a0ec5737d3d
Author: Tim Pierce <twp at curoverse.com>
Date: Fri Mar 14 15:14:37 2014 -0400
Remove legacy 'thaw' code (refs #2221).
diff --git a/sdk/cli/bin/crunch-job b/sdk/cli/bin/crunch-job
index 2cd1002..07b4943 100755
--- a/sdk/cli/bin/crunch-job
+++ b/sdk/cli/bin/crunch-job
@@ -1241,65 +1241,6 @@ sub freeze
sub thaw
{
croak ("Thaw not implemented");
-
- # my $whc;
- # my $key = shift;
- # Log (undef, "thaw from $key");
-
- # @jobstep = ();
- # @jobstep_done = ();
- # @jobstep_todo = ();
- # @jobstep_tomerge = ();
- # $jobstep_tomerge_level = 0;
- # my $frozenjob = {};
-
- # my $stream = new Warehouse::Stream ( whc => $whc,
- # hash => [split (",", $key)] );
- # $stream->rewind;
- # while (my $dataref = $stream->read_until (undef, "\n\n"))
- # {
- # if ($$dataref =~ /^job /)
- # {
- # foreach (split ("\n", $$dataref))
- # {
- # my ($k, $v) = split ("=", $_, 2);
- # $frozenjob->{$k} = freezeunquote ($v);
- # }
- # next;
- # }
-
- # if ($$dataref =~ /^merge (\d+) (.*)/)
- # {
- # $jobstep_tomerge_level = $1;
- # @jobstep_tomerge
- # = map { freezeunquote ($_) } split ("\n", freezeunquote($2));
- # next;
- # }
-
- # my $Jobstep = { };
- # foreach (split ("\n", $$dataref))
- # {
- # my ($k, $v) = split ("=", $_, 2);
- # $Jobstep->{$k} = freezeunquote ($v) if $k;
- # }
- # $Jobstep->{'failures'} = 0;
- # push @jobstep, $Jobstep;
-
- # if ($Jobstep->{exitcode} eq "0")
- # {
- # push @jobstep_done, $#jobstep;
- # }
- # else
- # {
- # push @jobstep_todo, $#jobstep;
- # }
- # }
-
- # foreach (qw (script script_version script_parameters))
- # {
- # $Job->{$_} = $frozenjob->{$_};
- # }
- # $Job->save if $job_has_uuid;
}
-----------------------------------------------------------------------
hooks/post-receive
--
More information about the arvados-commits
mailing list