Я хочу запретить владельцу набора исправлений просматривать и голосовать за свой набор исправлений в Gerrit. В настоящее время я использую следующий код -
sum_list([], 0).
sum_list([H | Rest], Sum) :- sum_list(Rest,Tmp), Sum is H + Tmp.
add_category_min_score(In, Category, Min, P) :-
findall(2, gerrit:commit_label(label(Category,2),R),Z),
sum_list(Z, Sum),
Sum >= Min, !,
gerrit:commit_label(label(Category, V), U),
V >= 1,
!,
P = [label(Category,ok(U)) | In].
add_category_min_score(In, Category,Min,P) :-
P = [label(Category,need(Min)) | In].
submit_rule(S) :-
gerrit:default_submit(X),
X =.. [submit | Ls],
gerrit:remove_label(Ls,label('Code-Review',_),NoCR),
add_category_min_score(NoCR,'Code-Review', 4, Labels),
S =.. [submit | Labels].
Я попробовал следующее: Пример – 8 и ответить здесь.
Любая помощь будет полезна, спасибо!