~ubuntu-branches/ubuntu/precise/padre/precise

« back to all changes in this revision

Viewing changes to lib/Wx/Perl/Dialog/Frame.pm

  • Committer: Bazaar Package Importer
  • Author(s): Damyan Ivanov
  • Date: 2010-05-08 09:17:22 UTC
  • mfrom: (1.2.1 upstream) (10.1.1 sid)
  • Revision ID: james.westby@ubuntu.com-20100508091722-y6008jtk0ap6znyn
Tags: 0.60.ds1-3
rules: run tests with HOME=$fake_home to avoud failing when $HOME points
to a non-existent location. Closes: #579289

Show diffs side-by-side

added added

removed removed

Lines of Context:
3
3
use 5.008;
4
4
use strict;
5
5
use warnings;
6
 
use File::Spec ();
7
 
use Wx::Perl::Dialog;
8
 
use Wx::STC ();
9
 
 
10
 
use base 'Wx::Frame';
11
 
 
12
 
our $VERSION = '0.50';
 
6
use File::Spec       ();
 
7
use Wx::Perl::Dialog ();
 
8
use Wx::STC          ();
 
9
 
 
10
our $VERSION = '0.60';
 
11
our @ISA     = 'Wx::Frame';
13
12
 
14
13
sub new {
15
14
        my ($class) = @_;
22
21
                Wx::wxDefaultSize,
23
22
        );
24
23
 
25
 
        #    Wx::Event:EVT_ACTIVATE($self, \&on_activate);
 
24
        # Wx::Event:EVT_ACTIVATE($self, \&on_activate);
26
25
        Wx::Event::EVT_CLOSE(
27
26
                $self,
28
27
                sub {
45
44
 
46
45
1;
47
46
 
48
 
# Copyright 2008-2009 The Padre development team as listed in Padre.pm.
 
47
# Copyright 2008-2010 The Padre development team as listed in Padre.pm.
49
48
# LICENSE
50
49
# This program is free software; you can redistribute it and/or
51
50
# modify it under the same terms as Perl 5 itself.