Author: tim.bunce
Date: Mon Dec  8 12:29:42 2008
New Revision: 645

Modified:
    trunk/bin/nytprofhtml

Log:
Detect version mismatch between bin/nytprofhtml and the core lib.


Modified: trunk/bin/nytprofhtml
==============================================================================
--- trunk/bin/nytprofhtml       (original)
+++ trunk/bin/nytprofhtml       Mon Dec  8 12:29:42 2008
@@ -28,6 +28,10 @@

  our $VERSION = 1.02;

+if ($VERSION != $Devel::NYTProf::Core::VERSION) {
+    die "$0 version '$VERSION' doesn't match  
version '$Devel::NYTProf::Core::VERSION' of  
$INC{'Devel/NYTProf/Core.pm'}\n";
+}
+
  # These control the limits for what the script will consider ok to severe  
times
  # specified in standard deviations from the mean time
  use constant SEVERITY_SEVERE => 2.0;    # above this deviation, a  
bottleneck
@@ -219,7 +223,6 @@
          # package and subname
          my $subname = $sub->subname;
          if (ref $subname) { # subs have been merged
-            warn "[EMAIL PROTECTED]";
              push @hints, sprintf "merge of %d subs", scalar @$subname;
              $subname = $subname->[0];
          }

--~--~---------~--~----~------------~-------~--~----~
You've received this message because you are subscribed to
the Devel::NYTProf Development User group.

Group hosted at:  http://groups.google.com/group/develnytprof-dev
Project hosted at:  http://perl-devel-nytprof.googlecode.com
CPAN distribution:  http://search.cpan.org/dist/Devel-NYTProf

To post, email:  [email protected]
To unsubscribe, email:  [EMAIL PROTECTED]
-~----------~----~----~----~------~----~------~--~---

Reply via email to