Changeset 7480

Timestamp:

08/23/09 06:38:24 (2 years ago)

Author:

azawawi

Message:

[Padre] Refactoring quick fix calls...

File:

• trunk/Padre/lib/Padre/Wx/Menu/Edit.pm (modified) (1 diff)

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

@@ -178 +178 @@
             my @list  = ();
             my @items = ();
-            if ( $doc->can('event_on_quick_fix') ) {
-
-                # add list items from callbacks
-                @items = $doc->event_on_quick_fix($editor);
-                my $item_count = 0;
+            eval { 
+                # Find available quick fixes from provider
+                my $provider = $doc->get_quick_fix_provider; 
+                @items = $provider->quick_fix_list($editor);
+
+                # Add quick list items from document's quick fix provider
                 foreach my $item (@items) {
                     push @list, $item->{text};
                 }
+            };
+            if($@) {
+                warn "Error while calling get_quick_fix_provider: $@\n";
             }
             my $empty_list = ( scalar @list == 0 );