5 description => "Add category list pull-down to OpacHiddenItemsExceptions",
8 my ($dbh, $out) = @$args{qw(dbh out)};
11 UPDATE systempreferences SET value = REPLACE(value,"|",","),
12 explanation = REPLACE(explanation,"separated by |,","separated by comma,")
13 WHERE variable = "OpacHiddenItemsExceptions"
15 # Print useful stuff here
16 say $out "Settings for OpacHiddenItemsExceptions have been updated";