Change the Report modules to use Lmo

bin/pt-slave-restart

@@ -1543,10 +1543,11 @@ sub import {
 
    my $caller     = scalar caller(); # Caller's package
    my %exports = (
-      extends => \&extends,
-      has     => \&has,
-      with    => \&with,
-      confess => \&Carp::confess,
+      extends  => \&extends,
+      has      => \&has,
+      with     => \&with,
+      override => \&override,
+      confess  => \&Carp::confess,
    );
 
    $export_for{$caller} = \%exports;
@@ -1826,6 +1827,16 @@ BEGIN {
    }
 }
 
+sub override {
+   my ($methods, $code) = @_;
+   my $caller          = scalar caller;
+
+   for my $method ( ref($methods) ? @$methods : $methods ) {
+      my $full_method     = "${caller}::${method}";
+      *{_glob_for $full_method} = $code;
+   }
+}
+
 }
 1;
 }