Games::Risk::Tk::About - prisk about information


Games-Risk documentation Contained in the Games-Risk distribution.

Index


Code Index:

NAME

Top

Games::Risk::Tk::About - prisk about information

VERSION

Top

version 3.103040

DESCRIPTION

Top

GR::Tk::About implements a Tk window used to show the copyright and licence of the game.

ATTRIBUTES

Top

parent

A Tk window that will be the parent of the toplevel window created. This parameter is mandatory.

METHODS

Top

new

    Games::Risk::Tk::About->new( %opts );

Create a window showing some information about the game. See the attributes for available options.

AUTHOR

Top

  Jerome Quelin

COPYRIGHT AND LICENSE

Top


Games-Risk documentation Contained in the Games-Risk distribution.

#
# This file is part of Games-Risk
#
# This software is Copyright (c) 2008 by Jerome Quelin.
#
# This is free software, licensed under:
#
#   The GNU General Public License, Version 3, June 2007
#
use 5.010;
use strict;
use warnings;

package Games::Risk::Tk::About;
BEGIN {
  $Games::Risk::Tk::About::VERSION = '3.103040';
}
# ABSTRACT: prisk about information

use Moose;
use Path::Class;
use Tk::Role::Dialog 1.101480;

use Games::Risk;
use Games::Risk::I18N      qw{ T };
use Games::Risk::Resources qw{ $SHAREDIR };

with 'Tk::Role::Dialog';


# -- initialization / finalization

sub _build_title     { 'prisk - ' . T('about') }
sub _build_icon      { $SHAREDIR->file('icons', '32', 'about.png') }
sub _build_header    { "prisk $Games::Risk::VERSION" }
sub _build_resizable { 0 }
sub _build_cancel    { T('Close') }

sub _build_text { join "\n",
    T('Created by Jerome Quelin'),
    T('Copyright (c) 2008 Jerome Quelin, all rights reserved'),
    '',
    T('prisk is free software; you can redistribute it and/or modify it under the terms of the GPLv3.'),
    ;
}

no Moose;
__PACKAGE__->meta->make_immutable;
1;



__END__