From dcd50e7b969dc0809b2456fdcca455a22af9f275 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Mon, 23 May 2022 19:45:20 -0700 Subject: [PATCH] bulk remove package def options, RT#86028 --- bin/part_pkg-bulk_change | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/bin/part_pkg-bulk_change b/bin/part_pkg-bulk_change index c882954bf..b8c1b8dce 100755 --- a/bin/part_pkg-bulk_change +++ b/bin/part_pkg-bulk_change @@ -29,6 +29,12 @@ foreach my $part_pkg ( qsearch('part_pkg',\%search) ) { my $part_pkg_option = qsearchs('part_pkg_option', \%hash); + unless ( defined $opt_v ) { + my $error = $part_pkg_option && $part_pkg_option->delete; + die $error if $error; + next; + } + if ( $part_pkg_option ) { next if $part_pkg_option->optionvalue eq $opt_v; $part_pkg_option->optionvalue($opt_v); @@ -84,7 +90,7 @@ Search options: Change options: --o: part_pkg_option optionname +-o: part_pkg_option optionname (use without -v to unset) -v: part_pkg_option optionvalue -- 2.11.0