1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut synced 2025-06-07 16:55:42 -04:00
perlbuut/plugins/save_config.pm
2009-12-05 00:02:04 -05:00

10 lines
379 B
Perl

sub {
my( $said, $pm ) = @_;
push @{$said->{special_commands}}, [ bb3_save_main_conf => 1 ];
print "Attempting to save my config, note that it won't change anything until I restart.";
}
__DATA__
save_config. Attempts to write the current config structure back to the file it was originally read from. Hopefully you've modified it first. Note, may lose comments. Root only.