~ubuntu-branches/ubuntu/saucy/padre/saucy-proposed

« back to all changes in this revision

Viewing changes to lib/Padre/Wx/FBP/Syntax.pm

  • Committer: Package Import Robot
  • Author(s): Dominique Dumont, gregor herrmann, Dominique Dumont
  • Date: 2012-01-04 12:04:20 UTC
  • mfrom: (1.3.3)
  • Revision ID: package-import@ubuntu.com-20120104120420-i5oybqwf91m1d3il
Tags: 0.92.ds1-1
[ gregor herrmann ]
* Remove debian/source/local-options; abort-on-upstream-changes
  and unapply-patches are default in dpkg-source since 1.16.1.
* Swap order of alternative (build) dependencies after the perl
  5.14 transition.

[ Dominique Dumont ]
* Imported Upstream version 0.92.ds1
* removed fix-spelling patch (applied upstream)
* lintian-override: use wildcard to avoid listing a gazillion files
* updated size of some 'not-real-man-page' entries
* rules: remove dekstop cruft (replaced by a file provided in debian
  directory)
* control: removed Breaks statement. Add /me to uploaders. Updated
  dependencies
* rules: make sure that non-DFSG file (i.e. the cute butterfly, sigh)
  is not distributed

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
package Padre::Wx::FBP::Syntax;
 
2
 
 
3
## no critic
 
4
 
 
5
# This module was generated by Padre::Plugin::FormBuilder::Perl.
 
6
# To change this module edit the original .fbp file and regenerate.
 
7
# DO NOT MODIFY THIS FILE BY HAND!
 
8
 
 
9
use 5.008;
 
10
use strict;
 
11
use warnings;
 
12
use Padre::Wx ();
 
13
use Padre::Wx::Role::Main ();
 
14
use Padre::Wx::HtmlWindow ();
 
15
use Padre::Wx::TreeCtrl ();
 
16
 
 
17
our $VERSION = '0.92';
 
18
our @ISA     = qw{
 
19
        Padre::Wx::Role::Main
 
20
        Wx::Panel
 
21
};
 
22
 
 
23
sub new {
 
24
        my $class  = shift;
 
25
        my $parent = shift;
 
26
 
 
27
        my $self = $class->SUPER::new(
 
28
                $parent,
 
29
                -1,
 
30
                Wx::DefaultPosition,
 
31
                [ 500, 300 ],
 
32
                Wx::TAB_TRAVERSAL,
 
33
        );
 
34
 
 
35
        $self->{tree} = Padre::Wx::TreeCtrl->new(
 
36
                $self,
 
37
                -1,
 
38
                Wx::DefaultPosition,
 
39
                Wx::DefaultSize,
 
40
                Wx::TR_FULL_ROW_HIGHLIGHT | Wx::TR_SINGLE,
 
41
        );
 
42
 
 
43
        Wx::Event::EVT_TREE_ITEM_ACTIVATED(
 
44
                $self,
 
45
                $self->{tree},
 
46
                sub {
 
47
                        shift->on_tree_item_activated(@_);
 
48
                },
 
49
        );
 
50
 
 
51
        Wx::Event::EVT_TREE_SEL_CHANGED(
 
52
                $self,
 
53
                $self->{tree},
 
54
                sub {
 
55
                        shift->on_tree_item_selection_changed(@_);
 
56
                },
 
57
        );
 
58
 
 
59
        $self->{help} = Padre::Wx::HtmlWindow->new(
 
60
                $self,
 
61
                -1,
 
62
                Wx::DefaultPosition,
 
63
                Wx::DefaultSize,
 
64
                Wx::STATIC_BORDER,
 
65
        );
 
66
 
 
67
        $self->{show_stderr} = Wx::Button->new(
 
68
                $self,
 
69
                -1,
 
70
                Wx::gettext("Show Standard Error"),
 
71
                Wx::DefaultPosition,
 
72
                Wx::DefaultSize,
 
73
        );
 
74
 
 
75
        Wx::Event::EVT_BUTTON(
 
76
                $self,
 
77
                $self->{show_stderr},
 
78
                sub {
 
79
                        shift->show_stderr(@_);
 
80
                },
 
81
        );
 
82
 
 
83
        my $bSizer38 = Wx::BoxSizer->new(Wx::HORIZONTAL);
 
84
        $bSizer38->Add( $self->{tree}, 3, Wx::ALL | Wx::EXPAND, 0 );
 
85
        $bSizer38->Add( $self->{help}, 2, Wx::ALL | Wx::EXPAND, 0 );
 
86
 
 
87
        my $bSizer39 = Wx::BoxSizer->new(Wx::HORIZONTAL);
 
88
        $bSizer39->Add( $self->{show_stderr}, 0, Wx::ALL | Wx::BOTTOM | Wx::TOP, 2 );
 
89
 
 
90
        my $bSizer37 = Wx::BoxSizer->new(Wx::VERTICAL);
 
91
        $bSizer37->Add( $bSizer38, 1, Wx::EXPAND, 0 );
 
92
        $bSizer37->Add( $bSizer39, 0, Wx::EXPAND, 0 );
 
93
 
 
94
        $self->SetSizer($bSizer37);
 
95
        $self->Layout;
 
96
 
 
97
        return $self;
 
98
}
 
99
 
 
100
sub on_tree_item_activated {
 
101
        $_[0]->main->error('Handler method on_tree_item_activated for event tree.OnTreeItemActivated not implemented');
 
102
}
 
103
 
 
104
sub on_tree_item_selection_changed {
 
105
        $_[0]->main->error('Handler method on_tree_item_selection_changed for event tree.OnTreeSelChanged not implemented');
 
106
}
 
107
 
 
108
sub show_stderr {
 
109
        $_[0]->main->error('Handler method show_stderr for event show_stderr.OnButtonClick not implemented');
 
110
}
 
111
 
 
112
1;
 
113
 
 
114
# Copyright 2008-2011 The Padre development team as listed in Padre.pm.
 
115
# LICENSE
 
116
# This program is free software; you can redistribute it and/or
 
117
# modify it under the same terms as Perl 5 itself.
 
118