r8284 - in /trunk/libfile-remove-perl: Changes META.yml debian/changelog lib/File/Remove.pm t/05_links.t t/99_author.t

[dmn at users.alioth.debian.org]

Author: dmn
Date: Tue Oct 16 19:43:38 2007
New Revision: 8284

URL: http://svn.debian.org/wsvn/?sc=1&rev=8284
Log:
* New upstream release

Modified:
    trunk/libfile-remove-perl/Changes
    trunk/libfile-remove-perl/META.yml
    trunk/libfile-remove-perl/debian/changelog
    trunk/libfile-remove-perl/lib/File/Remove.pm
    trunk/libfile-remove-perl/t/05_links.t
    trunk/libfile-remove-perl/t/99_author.t

Modified: trunk/libfile-remove-perl/Changes
URL: http://svn.debian.org/wsvn/trunk/libfile-remove-perl/Changes?rev=8284&op=diff
==============================================================================
--- trunk/libfile-remove-perl/Changes (original)
+++ trunk/libfile-remove-perl/Changes Tue Oct 16 19:43:38 2007
@@ -1,4 +1,9 @@
 Revision history for Perl extension File::Remove.
+
+0.38 Mon 15 Oct 2007  (Adam Kennedy)
+	- Removed an extremely dangerous and reckless test case that tried
+	  to delete a soft link to root and (when it failed) deleted the
+	  actual root directory.
 
 0.37 Sun  8 Jul 2007  (Adam Kennedy)
 	- Restoring support for broken symlinks (Marek Rouchal)

Modified: trunk/libfile-remove-perl/META.yml
URL: http://svn.debian.org/wsvn/trunk/libfile-remove-perl/META.yml?rev=8284&op=diff
==============================================================================
--- trunk/libfile-remove-perl/META.yml (original)
+++ trunk/libfile-remove-perl/META.yml Tue Oct 16 19:43:38 2007
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:                File-Remove
-version:             0.37
+version:             0.38
 abstract:            Remove files and directories
 license:             ~
 generated_by:        ExtUtils::MakeMaker version 6.32

Modified: trunk/libfile-remove-perl/debian/changelog
URL: http://svn.debian.org/wsvn/trunk/libfile-remove-perl/debian/changelog?rev=8284&op=diff
==============================================================================
--- trunk/libfile-remove-perl/debian/changelog (original)
+++ trunk/libfile-remove-perl/debian/changelog Tue Oct 16 19:43:38 2007
@@ -1,10 +1,14 @@
-libfile-remove-perl (0.37-2) UNRELEASED; urgency=low
+libfile-remove-perl (0.38-1) UNRELEASED; urgency=low
 
+  [ Damyan Ivanov ]
+  * New upstream release
+
+  [ gregor herrmann ]
   * debian/control: Added: Vcs-Svn field (source stanza); Vcs-Browser
     field (source stanza); Homepage field (source stanza). Removed: XS-
     Vcs-Svn fields.
 
- -- gregor herrmann <gregor+debian at comodo.priv.at>  Tue, 09 Oct 2007 22:29:23 +0200
+ -- Damyan Ivanov <dmn at debian.org>  Tue, 16 Oct 2007 22:43:03 +0300
 
 libfile-remove-perl (0.37-1) unstable; urgency=low
 

Modified: trunk/libfile-remove-perl/lib/File/Remove.pm
URL: http://svn.debian.org/wsvn/trunk/libfile-remove-perl/lib/File/Remove.pm?rev=8284&op=diff
==============================================================================
--- trunk/libfile-remove-perl/lib/File/Remove.pm (original)
+++ trunk/libfile-remove-perl/lib/File/Remove.pm Tue Oct 16 19:43:38 2007
@@ -3,7 +3,7 @@
 use strict;
 use vars qw(@EXPORT_OK @ISA $VERSION $debug $unlink $rmdir);
 BEGIN {
-	$VERSION   = '0.37';
+	$VERSION   = '0.38';
 	@ISA       = qw(Exporter);
 	@EXPORT_OK = qw(remove rm trash); # nothing by default :)
 

Modified: trunk/libfile-remove-perl/t/05_links.t
URL: http://svn.debian.org/wsvn/trunk/libfile-remove-perl/t/05_links.t?rev=8284&op=diff
==============================================================================
--- trunk/libfile-remove-perl/t/05_links.t (original)
+++ trunk/libfile-remove-perl/t/05_links.t Tue Oct 16 19:43:38 2007
@@ -30,7 +30,7 @@
 ok( -d $testdir, 'Created testdir' );
 my %links = (
 	l_ex   => curdir(),
-	l_ex_a => rootdir(),
+#	l_ex_a => rootdir(),
 	l_nex  => 'does_not_exist'
 );
 my $errs = 0;

Modified: trunk/libfile-remove-perl/t/99_author.t
URL: http://svn.debian.org/wsvn/trunk/libfile-remove-perl/t/99_author.t?rev=8284&op=diff
==============================================================================
--- trunk/libfile-remove-perl/t/99_author.t (original)
+++ trunk/libfile-remove-perl/t/99_author.t Tue Oct 16 19:43:38 2007
@@ -12,11 +12,11 @@
 	plan( skip_all => "Author tests not required for installation" );
 }
 
-# Can we run the POD tests?
+# Load the testing modules
 eval "use Test::Pod 1.00";
-if ( $@ ) {
-	plan( skip_all => "Test::Pod 1.00 required for testing POD" );
-}
+
+# Can we run the version tests
+eval "use Test::MinimumVersion 0.007;";
 
 
 
@@ -29,7 +29,10 @@
 # Hack Pod::Simple::BlackBox to ignore the Test::Inline
 # "Extended Begin" syntax.
 # For example, "=begin has more than one word errors"
-my $begin = \&Pod::Simple::BlackBox::_ponder_begin;
+my $begin;
+if ( $Test::Pod::VERSION ) {
+	$begin = \&Pod::Simple::BlackBox::_ponder_begin;
+}
 sub mybegin {
 	my $para = $_[1];
 	my $content = join ' ', splice @$para, 2;
@@ -50,12 +53,24 @@
 
 SCOPE: {
 	local $^W = 0;
-	*Pod::Simple::BlackBox::_ponder_begin = \&mybegin;
+	if ( $Test::Pod::VERSION ) {
+		*Pod::Simple::BlackBox::_ponder_begin = \&mybegin;
+	}
 }
 
 #####################################################################
 # END BLACK MAGIC
 #####################################################################
 
+plan( 'no_plan' );
+ok( 1, "Running author tests" );
+
 # Test POD
-all_pod_files_ok();
+if ( $Test::Pod::VERSION ) {
+	all_pod_files_ok();
+}
+
+# Test version
+if ( $Test::MinimumVersion::VERSION ) {
+	all_minimum_version_from_metayml_ok( { no_plan => 1 } );
+}