Revision: 1427
Author:   [email protected]
Date:     Sat Aug 11 03:53:27 2012
Log:      Fixed version numbers in nytprofhtml and nytprofmerge
http://code.google.com/p/perl-devel-nytprof/source/detail?r=1427

Modified:
 /trunk/Changes
 /trunk/bin/nytprofhtml
 /trunk/bin/nytprofmerge
 /trunk/lib/Devel/NYTProf/Core.pm
 /trunk/lib/Devel/NYTProf.pm

=======================================
--- /trunk/Changes      Fri Aug 10 06:10:59 2012
+++ /trunk/Changes      Sat Aug 11 03:53:27 2012
@@ -6,6 +6,10 @@

 =cut

+=head2 Changes in Devel::NYTProf 4.08 (svn 1427) 11th Aug 2012
+
+  Fixed version numbers in nytprofhtml and nytprofmerge.
+
 =head2 Changes in Devel::NYTProf 4.07 (svn 1419) 10th Aug 2012

   Fixed html generation to be valid, RT#70207 (H.Merijn Brand).
=======================================
--- /trunk/bin/nytprofhtml      Fri Aug 10 04:27:46 2012
+++ /trunk/bin/nytprofhtml      Sat Aug 11 03:53:27 2012
@@ -41,14 +41,14 @@
 );
 use Devel::NYTProf::Constants qw(NYTP_SCi_CALLING_SUB);

-my $json_any = eval { require JSON::Any; JSON::Any->import; JSON::Any->new }
-    or warn "Can't load JSON::Any module - HTML visualizations skipped.\n";
-
-our $VERSION = '4.06';
+our $VERSION = '4.08';

 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";
 }
+
+my $json_any = eval { require JSON::Any; JSON::Any->import; JSON::Any->new }
+    or warn "Can't load JSON::Any module - HTML visualizations skipped.\n";

 my @treemap_colors = (0,2,4,6,8,10,1,3,5,7,9);

@@ -93,7 +93,7 @@
 This script of part of the Devel::NYTProf distribution.
 See http://search.cpan.org/dist/Devel-NYTProf/ for details and copyright.
 END
-    return 1;
+    return 0;
 }


=======================================
--- /trunk/bin/nytprofmerge     Thu Mar 22 09:00:59 2012
+++ /trunk/bin/nytprofmerge     Sat Aug 11 03:53:27 2012
@@ -18,7 +18,7 @@
 require Devel::NYTProf::Data;
 use List::Util qw(min sum);

-our $VERSION = '4.06';
+our $VERSION = '4.08';

 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";
@@ -354,7 +354,7 @@
 This script of part of the Devel::NYTProf distribution.
 See http://search.cpan.org/dist/Devel-NYTProf/ for details and copyright.
 END
-    exit 1;
+    exit 0;
 }

 __END__
=======================================
--- /trunk/lib/Devel/NYTProf/Core.pm    Fri Aug 10 06:10:59 2012
+++ /trunk/lib/Devel/NYTProf/Core.pm    Sat Aug 11 03:53:27 2012
@@ -14,7 +14,7 @@

 use XSLoader;

-our $VERSION = '4.07';    # increment with XS changes too
+our $VERSION = '4.08';    # increment with XS changes too

 XSLoader::load('Devel::NYTProf', $VERSION);

=======================================
--- /trunk/lib/Devel/NYTProf.pm Fri Aug 10 06:10:59 2012
+++ /trunk/lib/Devel/NYTProf.pm Sat Aug 11 03:53:27 2012
@@ -11,7 +11,7 @@
 ###########################################################
 package Devel::NYTProf;

-our $VERSION = '4.07'; # also change in Devel::NYTProf::Core
+our $VERSION = '4.08'; # also change in Devel::NYTProf::Core

 package    # hide the package from the PAUSE indexer
     DB;

--
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