Changeset 7480

Show
Ignore:
Timestamp:
08/23/09 06:38:24 (13 months ago)
Author:
azawawi
Message:

[Padre] Refactoring quick fix calls...

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • trunk/Padre/lib/Padre/Wx/Menu/Edit.pm

    r7452 r7480  
    178178                        my @list  = (); 
    179179                        my @items = (); 
    180                         if ( $doc->can('event_on_quick_fix') ) { 
    181  
    182                                 # add list items from callbacks 
    183                                 @items = $doc->event_on_quick_fix($editor); 
    184                                 my $item_count = 0; 
     180                        eval {  
     181                                # Find available quick fixes from provider 
     182                                my $provider = $doc->get_quick_fix_provider;  
     183                                @items = $provider->quick_fix_list($editor); 
     184 
     185                                # Add quick list items from document's quick fix provider 
    185186                                foreach my $item (@items) { 
    186187                                        push @list, $item->{text}; 
    187188                                } 
     189                        }; 
     190                        if($@) { 
     191                                warn "Error while calling get_quick_fix_provider: $@\n"; 
    188192                        } 
    189193                        my $empty_list = ( scalar @list == 0 );