← Back to branch summary

~ubuntu-branches/ubuntu/trusty/padre/trusty-proposed

« back to all changes in this revision

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

  • Committer: Package Import Robot
  • Author(s): Dominique Dumont
  • Date: 2012-01-25 16:16:07 UTC
  • mfrom: (1.3.4)
  • Revision ID: package-import@ubuntu.com-20120125161607-ydc0rgxlfqk2ctrb
Tags: 0.94+dfsg1-1
* new upstream version
* watch: updated to match dfsg tag
* debian/not-real-manual.list: updated lib/Padre/Document/Perl.pm entry
* debian/copyright:
  * fixed DEP-5 syntax errors
  * updated copyright years.
  * reformatted with cme
* control: updated dependency list

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/Padre/Wx/FBP/Breakpoints.pm
 
1
package Padre::Wx::FBP::Breakpoints;
 
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.008005;
 
10
use utf8;
 
11
use strict;
 
12
use warnings;
 
13
use Padre::Wx ();
 
14
use Padre::Wx::Role::Main ();
 
15
 
 
16
our $VERSION = '0.94';
 
17
our @ISA     = qw{
 
18
        Padre::Wx::Role::Main
 
19
        Wx::Panel
 
20
};
 
21
 
 
22
sub new {
 
23
        my $class  = shift;
 
24
        my $parent = shift;
 
25
 
 
26
        my $self = $class->SUPER::new(
 
27
                $parent,
 
28
                -1,
 
29
                Wx::DefaultPosition,
 
30
                [ 195, 530 ],
 
31
                Wx::TAB_TRAVERSAL,
 
32
        );
 
33
 
 
34
        $self->{delete_not_breakable} = Wx::BitmapButton->new(
 
35
                $self,
 
36
                -1,
 
37
                Wx::NullBitmap,
 
38
                Wx::DefaultPosition,
 
39
                Wx::DefaultSize,
 
40
                Wx::BU_AUTODRAW,
 
41
        );
 
42
        $self->{delete_not_breakable}->SetToolTip(
 
43
                Wx::gettext("Delete MARKER_NOT_BREAKABLE\nCurrent File Only")
 
44
        );
 
45
 
 
46
        Wx::Event::EVT_BUTTON(
 
47
                $self,
 
48
                $self->{delete_not_breakable},
 
49
                sub {
 
50
                        shift->on_delete_not_breakable_clicked(@_);
 
51
                },
 
52
        );
 
53
 
 
54
        $self->{refresh} = Wx::BitmapButton->new(
 
55
                $self,
 
56
                -1,
 
57
                Wx::NullBitmap,
 
58
                Wx::DefaultPosition,
 
59
                Wx::DefaultSize,
 
60
                Wx::BU_AUTODRAW,
 
61
        );
 
62
        $self->{refresh}->SetToolTip(
 
63
                Wx::gettext("Refresh List")
 
64
        );
 
65
 
 
66
        Wx::Event::EVT_BUTTON(
 
67
                $self,
 
68
                $self->{refresh},
 
69
                sub {
 
70
                        shift->on_refresh_click(@_);
 
71
                },
 
72
        );
 
73
 
 
74
        $self->{set_breakpoints} = Wx::BitmapButton->new(
 
75
                $self,
 
76
                -1,
 
77
                Wx::NullBitmap,
 
78
                Wx::DefaultPosition,
 
79
                Wx::DefaultSize,
 
80
                Wx::BU_AUTODRAW,
 
81
        );
 
82
        $self->{set_breakpoints}->SetToolTip(
 
83
                Wx::gettext("Set Breakpoints (toggle)")
 
84
        );
 
85
 
 
86
        Wx::Event::EVT_BUTTON(
 
87
                $self,
 
88
                $self->{set_breakpoints},
 
89
                sub {
 
90
                        shift->on_set_breakpoints_clicked(@_);
 
91
                },
 
92
        );
 
93
 
 
94
        $self->{list} = Wx::ListCtrl->new(
 
95
                $self,
 
96
                -1,
 
97
                Wx::DefaultPosition,
 
98
                Wx::DefaultSize,
 
99
                Wx::LC_REPORT | Wx::LC_SINGLE_SEL,
 
100
        );
 
101
 
 
102
        $self->{show_project} = Wx::CheckBox->new(
 
103
                $self,
 
104
                -1,
 
105
                Wx::gettext("project"),
 
106
                Wx::DefaultPosition,
 
107
                Wx::DefaultSize,
 
108
        );
 
109
        $self->{show_project}->SetToolTip(
 
110
                Wx::gettext("show breakpoints in project")
 
111
        );
 
112
 
 
113
        Wx::Event::EVT_CHECKBOX(
 
114
                $self,
 
115
                $self->{show_project},
 
116
                sub {
 
117
                        shift->on_show_project_click(@_);
 
118
                },
 
119
        );
 
120
 
 
121
        $self->{delete_project_bp} = Wx::BitmapButton->new(
 
122
                $self,
 
123
                -1,
 
124
                Wx::NullBitmap,
 
125
                Wx::DefaultPosition,
 
126
                Wx::DefaultSize,
 
127
                Wx::BU_AUTODRAW,
 
128
        );
 
129
        $self->{delete_project_bp}->SetToolTip(
 
130
                Wx::gettext("Delete all project Breakpoints")
 
131
        );
 
132
 
 
133
        Wx::Event::EVT_BUTTON(
 
134
                $self,
 
135
                $self->{delete_project_bp},
 
136
                sub {
 
137
                        shift->on_delete_project_bp_clicked(@_);
 
138
                },
 
139
        );
 
140
 
 
141
        my $button_sizer = Wx::BoxSizer->new(Wx::HORIZONTAL);
 
142
        $button_sizer->Add( $self->{delete_not_breakable}, 0, Wx::ALL, 5 );
 
143
        $button_sizer->Add( 0, 0, 1, Wx::EXPAND, 5 );
 
144
        $button_sizer->Add( $self->{refresh}, 0, Wx::ALL, 5 );
 
145
        $button_sizer->Add( $self->{set_breakpoints}, 0, Wx::ALL, 5 );
 
146
 
 
147
        my $checkbox_sizer = Wx::StaticBoxSizer->new(
 
148
                Wx::StaticBox->new(
 
149
                        $self,
 
150
                        -1,
 
151
                        Wx::gettext("Show"),
 
152
                ),
 
153
                Wx::HORIZONTAL,
 
154
        );
 
155
        $checkbox_sizer->Add( $self->{show_project}, 0, Wx::ALL, 2 );
 
156
        $checkbox_sizer->Add( 0, 0, 1, Wx::EXPAND, 5 );
 
157
        $checkbox_sizer->Add( $self->{delete_project_bp}, 0, Wx::ALL, 5 );
 
158
 
 
159
        my $bSizer10 = Wx::BoxSizer->new(Wx::VERTICAL);
 
160
        $bSizer10->Add( $button_sizer, 0, Wx::EXPAND, 5 );
 
161
        $bSizer10->Add( $self->{list}, 1, Wx::ALL | Wx::EXPAND, 5 );
 
162
        $bSizer10->Add( $checkbox_sizer, 0, Wx::EXPAND, 5 );
 
163
 
 
164
        $self->SetSizer($bSizer10);
 
165
        $self->Layout;
 
166
 
 
167
        return $self;
 
168
}
 
169
 
 
170
sub on_delete_not_breakable_clicked {
 
171
        $_[0]->main->error('Handler method on_delete_not_breakable_clicked for event delete_not_breakable.OnButtonClick not implemented');
 
172
}
 
173
 
 
174
sub on_refresh_click {
 
175
        $_[0]->main->error('Handler method on_refresh_click for event refresh.OnButtonClick not implemented');
 
176
}
 
177
 
 
178
sub on_set_breakpoints_clicked {
 
179
        $_[0]->main->error('Handler method on_set_breakpoints_clicked for event set_breakpoints.OnButtonClick not implemented');
 
180
}
 
181
 
 
182
sub on_show_project_click {
 
183
        $_[0]->main->error('Handler method on_show_project_click for event show_project.OnCheckBox not implemented');
 
184
}
 
185
 
 
186
sub on_delete_project_bp_clicked {
 
187
        $_[0]->main->error('Handler method on_delete_project_bp_clicked for event delete_project_bp.OnButtonClick not implemented');
 
188
}
 
189
 
 
190
1;
 
191
 
 
192
# Copyright 2008-2012 The Padre development team as listed in Padre.pm.
 
193
# LICENSE
 
194
# This program is free software; you can redistribute it and/or
 
195
# modify it under the same terms as Perl 5 itself.
 
196