← Back to branch summary

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

« back to all changes in this revision

Viewing changes to lib/Padre/Wx/FBP/FindFast.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:
lib/Padre/Wx/FBP/FindFast.pm
1
 
package Padre::Wx::FBP::FindFast;
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
 
 
15
 
our $VERSION = '0.90';
16
 
our @ISA     = qw{
17
 
        Padre::Wx::Role::Main
18
 
        Wx::Panel
19
 
};
20
 
 
21
 
sub new {
22
 
        my $class  = shift;
23
 
        my $parent = shift;
24
 
 
25
 
        my $self = $class->SUPER::new(
26
 
                $parent,
27
 
                -1,
28
 
                Wx::wxDefaultPosition,
29
 
                Wx::wxDefaultSize,
30
 
                Wx::wxNO_BORDER | Wx::wxTAB_TRAVERSAL,
31
 
        );
32
 
 
33
 
        $self->{cancel} = Wx::Button->new(
34
 
                $self,
35
 
                -1,
36
 
                Wx::gettext("X"),
37
 
                Wx::wxDefaultPosition,
38
 
                Wx::wxDefaultSize,
39
 
        );
40
 
 
41
 
        Wx::Event::EVT_BUTTON(
42
 
                $self,
43
 
                $self->{cancel},
44
 
                sub {
45
 
                        shift->close_clicked(@_);
46
 
                },
47
 
        );
48
 
 
49
 
        $self->{find_label} = Wx::StaticText->new(
50
 
                $self,
51
 
                -1,
52
 
                Wx::gettext("Find") . ":",
53
 
        );
54
 
 
55
 
        $self->{find_text} = Wx::TextCtrl->new(
56
 
                $self,
57
 
                -1,
58
 
                "",
59
 
                Wx::wxDefaultPosition,
60
 
                Wx::wxDefaultSize,
61
 
                Wx::wxTE_NO_VSCROLL,
62
 
        );
63
 
 
64
 
        Wx::Event::EVT_TEXT(
65
 
                $self,
66
 
                $self->{find_text},
67
 
                sub {
68
 
                        shift->find_text_changed(@_);
69
 
                },
70
 
        );
71
 
 
72
 
        $self->{find_next} = Wx::Button->new(
73
 
                $self,
74
 
                -1,
75
 
                Wx::gettext("Next"),
76
 
                Wx::wxDefaultPosition,
77
 
                Wx::wxDefaultSize,
78
 
        );
79
 
        $self->{find_next}->SetDefault;
80
 
 
81
 
        Wx::Event::EVT_BUTTON(
82
 
                $self,
83
 
                $self->{find_next},
84
 
                sub {
85
 
                        shift->find_next_clicked(@_);
86
 
                },
87
 
        );
88
 
 
89
 
        $self->{find_previous} = Wx::Button->new(
90
 
                $self,
91
 
                -1,
92
 
                Wx::gettext("Previous"),
93
 
                Wx::wxDefaultPosition,
94
 
                Wx::wxDefaultSize,
95
 
        );
96
 
 
97
 
        Wx::Event::EVT_BUTTON(
98
 
                $self,
99
 
                $self->{find_previous},
100
 
                sub {
101
 
                        shift->find_previous_clicked(@_);
102
 
                },
103
 
        );
104
 
 
105
 
        $self->{find_case} = Wx::CheckBox->new(
106
 
                $self,
107
 
                -1,
108
 
                Wx::gettext("Match Case"),
109
 
                Wx::wxDefaultPosition,
110
 
                Wx::wxDefaultSize,
111
 
        );
112
 
 
113
 
        my $sizer = Wx::FlexGridSizer->new( 1, 6, 0, 0 );
114
 
        $sizer->AddGrowableRow(0);
115
 
        $sizer->SetFlexibleDirection(Wx::wxBOTH);
116
 
        $sizer->SetNonFlexibleGrowMode(Wx::wxFLEX_GROWMODE_SPECIFIED);
117
 
        $sizer->Add( $self->{cancel}, 0, Wx::wxALIGN_CENTER_VERTICAL | Wx::wxALL, 5 );
118
 
        $sizer->Add( $self->{find_label}, 0, Wx::wxALIGN_CENTER_VERTICAL | Wx::wxALL, 5 );
119
 
        $sizer->Add( $self->{find_text}, 0, Wx::wxALIGN_CENTER_VERTICAL | Wx::wxALL, 5 );
120
 
        $sizer->Add( $self->{find_next}, 0, Wx::wxALIGN_CENTER_VERTICAL | Wx::wxALL, 5 );
121
 
        $sizer->Add( $self->{find_previous}, 0, Wx::wxALIGN_CENTER_VERTICAL | Wx::wxALL, 5 );
122
 
        $sizer->Add( $self->{find_case}, 1, Wx::wxALIGN_CENTER_VERTICAL | Wx::wxALL, 5 );
123
 
 
124
 
        $self->SetSizerAndFit($sizer);
125
 
        $self->Layout;
126
 
 
127
 
        return $self;
128
 
}
129
 
 
130
 
sub find_text {
131
 
        $_[0]->{find_text};
132
 
}
133
 
 
134
 
sub find_next {
135
 
        $_[0]->{find_next};
136
 
}
137
 
 
138
 
sub find_previous {
139
 
        $_[0]->{find_previous};
140
 
}
141
 
 
142
 
sub find_case {
143
 
        $_[0]->{find_case};
144
 
}
145
 
 
146
 
sub close_clicked {
147
 
        $_[0]->main->error('Handler method close_clicked for event cancel.OnButtonClick not implemented');
148
 
}
149
 
 
150
 
sub find_text_changed {
151
 
        $_[0]->main->error('Handler method find_text_changed for event find_text.OnText not implemented');
152
 
}
153
 
 
154
 
sub find_next_clicked {
155
 
        $_[0]->main->error('Handler method find_next_clicked for event find_next.OnButtonClick not implemented');
156
 
}
157
 
 
158
 
sub find_previous_clicked {
159
 
        $_[0]->main->error('Handler method find_previous_clicked for event find_previous.OnButtonClick not implemented');
160
 
}
161
 
 
162
 
1;
163
 
 
164
 
# Copyright 2008-2011 The Padre development team as listed in Padre.pm.
165
 
# LICENSE
166
 
# This program is free software; you can redistribute it and/or
167
 
# modify it under the same terms as Perl 5 itself.
168
 
 
 
1
package Padre::Wx::FBP::FindFast;
 
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
 
 
15
our $VERSION = '0.92';
 
16
our @ISA     = qw{
 
17
        Padre::Wx::Role::Main
 
18
        Wx::Panel
 
19
};
 
20
 
 
21
sub new {
 
22
        my $class  = shift;
 
23
        my $parent = shift;
 
24
 
 
25
        my $self = $class->SUPER::new(
 
26
                $parent,
 
27
                -1,
 
28
                Wx::DefaultPosition,
 
29
                Wx::DefaultSize,
 
30
                Wx::NO_BORDER | Wx::TAB_TRAVERSAL,
 
31
        );
 
32
 
 
33
        $self->{cancel} = Wx::Button->new(
 
34
                $self,
 
35
                -1,
 
36
                Wx::gettext("X"),
 
37
                Wx::DefaultPosition,
 
38
                Wx::DefaultSize,
 
39
        );
 
40
 
 
41
        Wx::Event::EVT_BUTTON(
 
42
                $self,
 
43
                $self->{cancel},
 
44
                sub {
 
45
                        shift->close_clicked(@_);
 
46
                },
 
47
        );
 
48
 
 
49
        $self->{find_label} = Wx::StaticText->new(
 
50
                $self,
 
51
                -1,
 
52
                Wx::gettext("Find") . ":",
 
53
        );
 
54
 
 
55
        $self->{find_text} = Wx::TextCtrl->new(
 
56
                $self,
 
57
                -1,
 
58
                "",
 
59
                Wx::DefaultPosition,
 
60
                Wx::DefaultSize,
 
61
                Wx::TE_NO_VSCROLL,
 
62
        );
 
63
 
 
64
        Wx::Event::EVT_TEXT(
 
65
                $self,
 
66
                $self->{find_text},
 
67
                sub {
 
68
                        shift->find_text_changed(@_);
 
69
                },
 
70
        );
 
71
 
 
72
        $self->{find_previous} = Wx::Button->new(
 
73
                $self,
 
74
                -1,
 
75
                Wx::gettext("Previous"),
 
76
                Wx::DefaultPosition,
 
77
                Wx::DefaultSize,
 
78
        );
 
79
 
 
80
        Wx::Event::EVT_BUTTON(
 
81
                $self,
 
82
                $self->{find_previous},
 
83
                sub {
 
84
                        shift->find_previous_clicked(@_);
 
85
                },
 
86
        );
 
87
 
 
88
        $self->{find_next} = Wx::Button->new(
 
89
                $self,
 
90
                -1,
 
91
                Wx::gettext("Next"),
 
92
                Wx::DefaultPosition,
 
93
                Wx::DefaultSize,
 
94
        );
 
95
        $self->{find_next}->SetDefault;
 
96
 
 
97
        Wx::Event::EVT_BUTTON(
 
98
                $self,
 
99
                $self->{find_next},
 
100
                sub {
 
101
                        shift->find_next_clicked(@_);
 
102
                },
 
103
        );
 
104
 
 
105
        $self->{find_case} = Wx::CheckBox->new(
 
106
                $self,
 
107
                -1,
 
108
                Wx::gettext("Match Case"),
 
109
                Wx::DefaultPosition,
 
110
                Wx::DefaultSize,
 
111
        );
 
112
 
 
113
        my $bSizer79 = Wx::BoxSizer->new(Wx::HORIZONTAL);
 
114
        $bSizer79->Add( 0, 0, 0, Wx::ALL | Wx::EXPAND, 5 );
 
115
        $bSizer79->Add( $self->{cancel}, 0, Wx::ALIGN_CENTER_VERTICAL | Wx::ALL, 5 );
 
116
        $bSizer79->Add( $self->{find_label}, 0, Wx::ALIGN_CENTER_VERTICAL | Wx::ALL, 5 );
 
117
        $bSizer79->Add( $self->{find_text}, 0, Wx::ALIGN_CENTER_VERTICAL | Wx::ALL, 5 );
 
118
        $bSizer79->Add( $self->{find_previous}, 0, Wx::ALIGN_CENTER_VERTICAL | Wx::ALL, 5 );
 
119
        $bSizer79->Add( $self->{find_next}, 0, Wx::ALIGN_CENTER_VERTICAL | Wx::ALL, 5 );
 
120
        $bSizer79->Add( $self->{find_case}, 1, Wx::ALIGN_CENTER_VERTICAL | Wx::ALL, 5 );
 
121
        $bSizer79->Add( 0, 0, 0, Wx::ALL | Wx::EXPAND, 5 );
 
122
 
 
123
        $self->SetSizerAndFit($bSizer79);
 
124
        $self->Layout;
 
125
 
 
126
        return $self;
 
127
}
 
128
 
 
129
sub find_text {
 
130
        $_[0]->{find_text};
 
131
}
 
132
 
 
133
sub find_previous {
 
134
        $_[0]->{find_previous};
 
135
}
 
136
 
 
137
sub find_next {
 
138
        $_[0]->{find_next};
 
139
}
 
140
 
 
141
sub find_case {
 
142
        $_[0]->{find_case};
 
143
}
 
144
 
 
145
sub close_clicked {
 
146
        $_[0]->main->error('Handler method close_clicked for event cancel.OnButtonClick not implemented');
 
147
}
 
148
 
 
149
sub find_text_changed {
 
150
        $_[0]->main->error('Handler method find_text_changed for event find_text.OnText not implemented');
 
151
}
 
152
 
 
153
sub find_previous_clicked {
 
154
        $_[0]->main->error('Handler method find_previous_clicked for event find_previous.OnButtonClick not implemented');
 
155
}
 
156
 
 
157
sub find_next_clicked {
 
158
        $_[0]->main->error('Handler method find_next_clicked for event find_next.OnButtonClick not implemented');
 
159
}
 
160
 
 
161
1;
 
162
 
 
163
# Copyright 2008-2011 The Padre development team as listed in Padre.pm.
 
164
# LICENSE
 
165
# This program is free software; you can redistribute it and/or
 
166
# modify it under the same terms as Perl 5 itself.
 
167