Author: tim.bunce
Date: Mon Nov  3 08:16:43 2008
New Revision: 586

Modified:
    trunk/bin/nytprofhtml

Log:
Unlink destination (.js) file before copying new one so it won't fail for  
readonly files.


Modified: trunk/bin/nytprofhtml
==============================================================================
--- trunk/bin/nytprofhtml       (original)
+++ trunk/bin/nytprofhtml       Mon Nov  3 08:16:43 2008
@@ -461,6 +461,7 @@
      (my $lib = $INC{"Devel/NYTProf/Data.pm"}) =~ s/Data\.pm$//;
      for my $src (<$lib/js/*.js>) {
          (my $file = $src) =~ s/.*\///;
+        unlink "$opt{out}/$file";
          copy($src, "$opt{out}/$file")
              or warn "Unable to copy $src to $opt{out}/$file: $!";
      }

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