~ubuntu-branches/ubuntu/raring/padre/raring

« back to all changes in this revision

Viewing changes to lib/Padre/Wx/Dialog/Find.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:
6
6
use Padre::Search        ();
7
7
use Padre::Wx::FBP::Find ();
8
8
 
9
 
our $VERSION = '0.90';
 
9
our $VERSION = '0.92';
10
10
our @ISA     = qw{
11
11
        Padre::Wx::FBP::Find
12
12
};
135
135
        # Refresh
136
136
        $self->refresh;
137
137
 
 
138
        # Hide the Fast Find if visible
 
139
        $self->main->show_findfast(0);
 
140
 
138
141
        # Show the dialog
139
142
        my $result = $self->ShowModal;
140
143
 
141
 
        if ( $result == Wx::wxID_CANCEL ) {
142
 
 
143
 
                # As we leave the Find dialog, return the user to the current editor
144
 
                # window so they don't need to click it.
145
 
                my $editor = $self->current->editor;
146
 
                $editor->SetFocus if $editor;
147
 
 
148
 
                return;
149
 
        }
 
144
        # As we leave the Find dialog, return the user to the current editor
 
145
        # window so they don't need to click it.
 
146
        my $editor = $self->current->editor;
 
147
        $editor->SetFocus if $editor;
150
148
 
151
149
        return;
152
150
}