amalgame/commit
REMOVE: old update process code
author | Jacco van Ossenbruggen |
---|---|
Sat Sep 6 17:07:23 2014 +0200 | |
committer | Jacco van Ossenbruggen |
Sat Sep 6 17:07:23 2014 +0200 | |
commit | 6741270a2fd86ef9e0e117ed72868af94c048b43 |
tree | c9846d3b2b4254c0bd132c02567b6cf06e746253 |
parent | 083c06239fee97c5380d0c3748999a5c83ebcefb |
Diff style: patch stat
diff --git a/api/ag_process.pl b/api/ag_process.pl index abba6b7..e3195b8 100644 --- a/api/ag_process.pl +++ b/api/ag_process.pl @@ -64,10 +64,7 @@ http_add_process(Request) :- description('URI of an existing process or type of new process')]), strategy(Strategy, [uri, - description('URI of the strategy graph to which the process is added')]), - update(Update, - [boolean, default(false), - descrption('When set to true process is updated with new parameters')]) + description('URI of the strategy graph to which the process is added')]) ], [form_data(Params0)]), sort(SecInputs0, SecInputs), @@ -75,14 +72,7 @@ http_add_process(Request) :- findall(secondary_input=S,member(secondary_input=S, Params1), SecParams), subtract(Params1, SecParams, Params), fix_not_expanded_options(Params, ExpandedParams), - ( Update == true - -> rdf_retractall(Process, amalgame:secondary_input, _, Strategy), - update_process(Process, Strategy, SecInputs, ExpandedParams), - Focus = Process - ; ((nonvar(Source), nonvar(Target)) ; nonvar(Input)) - -> new_process(Process, Strategy, Source, Target, Input, SecInputs, ExpandedParams, Focus) - ; true - ), + new_process(Process, Strategy, Source, Target, Input, SecInputs, ExpandedParams, Focus), js_focus_node(Strategy, Focus, FocusNode), js_strategy_nodes(Strategy, Nodes), reply_json(json{focus:FocusNode, @@ -153,18 +143,6 @@ http_delete_node(Request) :- focus:FocusNode }). -%% update_process(+Process, +Strategy, +SecInputs, +Params) -% -% Update the parameters of Process. -update_process(Process, Strategy, SecInputs, Params) :- - flush_dependent_caches(Process, Strategy), - uri_query_components(Search, Params), - rdf(Process, rdf:type, Type, Strategy), - assert_secondary_inputs(SecInputs, Process, Type, Strategy), - rdf_transaction((rdf_retractall(Process, amalgame:parameters, _), - rdf_assert(Process, amalgame:parameters, literal(Search), Strategy) - )). - is_dependent_chk(Mapping, Process, Strategy) :- rdf_has(Mapping, amalgame:wasGeneratedBy, Process, RP), rdf(Mapping, RP, Process, Strategy),