package Autoload;

BEGIN {
			use Exporter();
			@ISA = qw(Exporter);
			@EXPORT = qw(AUTOLOAD);
}

sub AUTOLOAD() {
		my $subroutine = $AUTOLOAD;
		$subroutine =~ s/.*:://;
		$callme = 'Genesis::'.$subroutine;
		&{$callme};
}

END {}

return 1;