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);
Change options:
--o: part_pkg_option optionname
+-o: part_pkg_option optionname (use without -v to unset)
-v: part_pkg_option optionvalue