The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package Geo::Raster::Layer::Dialogs;
# @brief A helper module to bring in the GDAL dialogs in Glade XML

use strict;
use warnings;
use POSIX;

require Exporter;

our @ISA = qw(Exporter Gtk2::Ex::Geo::DialogMaster);

our %EXPORT_TAGS = ( 'all' => [ qw( ) ] );

our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );

our @EXPORT = qw(
	
);

=pod

=head1 NAME

Geo::Raster::Layer::Dialogs - Dialogs for raster (gdal) layers

=head1 DESCRIPTION

This module is included from Geo::Raster::Layer and it brings in Glade
dialogs for Geo::Raster::Layer objects.

=head1 METHODS

=head2 new

=cut

sub new {
    my($class, %params) = @_;

    my @buffer = <DATA>;
    pop @buffer unless $buffer[$#buffer] =~ /^\</; # remove the extra content

    my $self = Gtk2::Ex::Geo::DialogMaster::new($class, %params, buffer => \@buffer);

    bless $self => (ref($class) or $class);
    
    return $self;
}

1;
=pod

=head1 SEE ALSO

Gtk2::Ex::Geo

=head1 AUTHOR

Ari Jolma, E<lt>ajolma at aalto.fiE<gt>

=head1 COPYRIGHT AND LICENSE

Copyright (C) 2006- by Ari Jolma

This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.8.5 or,
at your option, any later version of Perl 5 you may have available.

=cut

__DATA__