Changeset 7483

Timestamp:

08/23/09 06:58:54 (2 years ago)

Author:

azawawi

Message:

[Padre] Moved & fixed pod docs

Location:

trunk/Padre/lib/Padre

Files:

• QuickFixProvider.pm (modified) (1 diff)
• Wx/Menu/Edit.pm (modified) (1 diff)

trunk/Padre/lib/Padre/QuickFixProvider.pm

@@ -38 +38 @@
 =head1 DESCRIPTION
 
+=head2 Quick Fix (Shortcut: Ctrl-2)
+
+This opens a dialog that lists different actions that relate to 
+fixing the code at the cursor. It will call B<event_on_quick_fix> method 
+passing a L<Padre::Wx::Editor> object on the current Padre document. 
+Please see the following sample implementation:
+
+    sub quick_fix_list {
+        my ($self, $editor) = @_;
+        
+        my @items = ( 
+            {
+                text     => '123...', 
+                listener => sub { 
+                    print "123...\n";
+                } 
+            },
+            {
+                text     => '456...', 
+                listener => sub { 
+                    print "456...\n";
+                } 
+            },
+        );
+        
+        return @items;
+    }
+
+=cut
+
 The B<Padre::QuickFixProvider> class provides a base class, default implementation
 and API documentation for quick fix provision support in L<Padre>.

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

@@ -218 +218 @@
             );
             $editor->UserListShow( 1, $words );
-
-=pod
-=head2 Quick Fix (Shortcut: Ctrl + Shift + 1)
-
-This opens a dialog that lists different actions that relate to 
-fixing the code at the cursor. It will call B<event_on_quick_fix> method 
-passing a L<Padre::Wx::Editor> object on the current Padre document. 
-Please see the following sample implementation:
-
-    sub event_on_quick_fix {
-        my ($self, $editor) = @_;
-        
-        my @items = ( 
-            {
-                text     => '123...', 
-                listener => sub { 
-                    print "123...\n";
-                } 
-            },
-            {
-                text     => '456...', 
-                listener => sub { 
-                    print "456...\n";
-                } 
-            },
-        );
-        
-        return @items;
-    }
-
-=cut
-
         },
     );