You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
37 lines
613 B
37 lines
613 B
# ----------------------------------------------------------------------------- |
|
# Milkbone::Conf |
|
# Desc: Registers hooks for loading, modifying, reading, and saving XML |
|
# configuration. |
|
# ----------------------------------------------------------------------------- |
|
|
|
package Milkbone::Conf; |
|
|
|
use strict; |
|
use warnings; |
|
|
|
use Milkbone; |
|
use XML::Simple; |
|
|
|
# standard modules |
|
use XML::Simple; |
|
|
|
# global variables |
|
my $config; |
|
|
|
# exports |
|
require Exporter; |
|
our @EXPORT = qw(option set_option); |
|
|
|
sub load_options { |
|
my ($name, $file) = @_; |
|
|
|
$config->{$name} = XMLin($file); |
|
} |
|
|
|
sub option { |
|
} |
|
|
|
sub set_option { |
|
} |
|
|
|
1;
|
|
|