updates: remove `background-process` from `recall` command metadata

This commit is contained in:
Pragmatic Software 2021-08-13 14:20:56 -07:00
parent d1df2d325c
commit 1b13123474
2 changed files with 29 additions and 2 deletions

View File

@ -25,8 +25,8 @@ use PBot::Imports;
# These are set by the /misc/update_version script
use constant {
BUILD_NAME => "PBot",
BUILD_REVISION => 4352,
BUILD_DATE => "2021-08-12",
BUILD_REVISION => 4353,
BUILD_DATE => "2021-08-13",
};
sub initialize {}

27
updates/4353_fix_recall.pl Executable file
View File

@ -0,0 +1,27 @@
#!/usr/bin/env perl
# Remove `background-process` metadata from `recall` command.
use warnings; use strict;
BEGIN {
use File::Basename;
my $location = -l __FILE__ ? dirname readlink __FILE__ : dirname __FILE__;
unshift @INC, $location;
}
use lib3512::HashObject;
use lib3503::PBot;
my ($data_dir, $version, $last_update) = @ARGV;
print "Updating recall command; version: $version, last_update: $last_update, data_dir: $data_dir\n";
my $pbot = lib3503::PBot->new();
my $commands = lib3512::HashObject->new(name => 'Command metadata', filename => "$data_dir/commands", pbot => $pbot);
$commands->load;
$commands->unset('recall', 'background-process');
exit 0;