r35820 - in /trunk/libsysadm-install-perl: Changes MANIFEST MANIFEST.SKIP META.yml Makefile.PL README debian/changelog debian/control lib/Sysadm/Install.pm t/007fs.t t/013download.t

ryan52-guest at users.alioth.debian.org ryan52-guest at users.alioth.debian.org
Tue May 19 05:45:24 UTC 2009


Author: ryan52-guest
Date: Tue May 19 05:45:19 2009
New Revision: 35820

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=35820
Log:
* New upstream release
* Add myself to Uploaders
* Debian Policy 3.8.1

Added:
    trunk/libsysadm-install-perl/t/013download.t
      - copied unchanged from r35819, branches/upstream/libsysadm-install-perl/current/t/013download.t
Modified:
    trunk/libsysadm-install-perl/Changes
    trunk/libsysadm-install-perl/MANIFEST
    trunk/libsysadm-install-perl/MANIFEST.SKIP
    trunk/libsysadm-install-perl/META.yml
    trunk/libsysadm-install-perl/Makefile.PL
    trunk/libsysadm-install-perl/README
    trunk/libsysadm-install-perl/debian/changelog
    trunk/libsysadm-install-perl/debian/control
    trunk/libsysadm-install-perl/lib/Sysadm/Install.pm
    trunk/libsysadm-install-perl/t/007fs.t

Modified: trunk/libsysadm-install-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsysadm-install-perl/Changes?rev=35820&op=diff
==============================================================================
--- trunk/libsysadm-install-perl/Changes (original)
+++ trunk/libsysadm-install-perl/Changes Tue May 19 05:45:19 2009
@@ -1,6 +1,12 @@
 ########################################
 Revision history for Sysadm::Install
 ########################################
+
+0.28 2009/05/11
+    (ms) Skipping fs_read_open test case if there's no cpio on 
+         the target system (reported for armv5tejl-linux).
+    (ms) Fixed download() with a better check for getstore(), 
+         suggested by Bernhard Minks.
 
 0.27 2008/03/26
     (ms) Fixes a broken CPAN upload.

Modified: trunk/libsysadm-install-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsysadm-install-perl/MANIFEST?rev=35820&op=diff
==============================================================================
--- trunk/libsysadm-install-perl/MANIFEST (original)
+++ trunk/libsysadm-install-perl/MANIFEST Tue May 19 05:45:19 2009
@@ -7,9 +7,8 @@
 eg/untar_in
 lib/Sysadm/Install.pm
 Makefile.PL
-MANIFEST
+MANIFEST			This list of files
 MANIFEST.SKIP
-META.yml			Module meta-data (added by MakeMaker)
 README
 t/001.t
 t/002tar.t
@@ -23,5 +22,7 @@
 t/010carp.t
 t/011defor.t
 t/012tap.t
+t/013download.t
 t/canned/test.tar
 t/canned/testa.tar
+META.yml                                 Module meta-data (added by MakeMaker)

Modified: trunk/libsysadm-install-perl/MANIFEST.SKIP
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsysadm-install-perl/MANIFEST.SKIP?rev=35820&op=diff
==============================================================================
--- trunk/libsysadm-install-perl/MANIFEST.SKIP (original)
+++ trunk/libsysadm-install-perl/MANIFEST.SKIP Tue May 19 05:45:19 2009
@@ -3,9 +3,6 @@
 ^Makefile.old$
 CVS
 .cvsignore
-docs
 MANIFEST.bak
-adm/release
-^SpiderMonkey.bs$
-^SpiderMonkey.c$
-^SpiderMonkey.o$
+^adm
+.git

Modified: trunk/libsysadm-install-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsysadm-install-perl/META.yml?rev=35820&op=diff
==============================================================================
--- trunk/libsysadm-install-perl/META.yml (original)
+++ trunk/libsysadm-install-perl/META.yml Tue May 19 05:45:19 2009
@@ -1,18 +1,31 @@
-# http://module-build.sourceforge.net/META-spec.html
-#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
-name:         Sysadm-Install
-version:      0.27
-version_from: lib/Sysadm/Install.pm
-installdirs:  site
+--- #YAML:1.0
+name:               Sysadm-Install
+version:            0.28
+abstract:           Typical installation tasks for system administrators
+author:
+    - Mike Schilli <m at perlmeister.com>
+license:            unknown
+distribution_type:  module
+configure_requires:
+    ExtUtils::MakeMaker:  0
+build_requires:
+    ExtUtils::MakeMaker:  0
 requires:
-    Cwd:                           0
-    File::Basename:                0
-    File::Copy:                    0
-    File::Path:                    0
-    File::Temp:                    0.16
-    Log::Log4perl:                 1
-    LWP::Simple:                   0
-    Term::ReadKey:                 0
-
-distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.17
+    Cwd:             0
+    File::Basename:  0
+    File::Copy:      0
+    File::Path:      0
+    File::Temp:      0.16
+    Log::Log4perl:   1
+    LWP::Simple:     0
+    Term::ReadKey:   0
+resources:
+    repository:  http://github.com/mschilli/sysadm-install-perl
+no_index:
+    directory:
+        - t
+        - inc
+generated_by:       ExtUtils::MakeMaker version 6.50
+meta-spec:
+    url:      http://module-build.sourceforge.net/META-spec-v1.4.html
+    version:  1.4

Modified: trunk/libsysadm-install-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsysadm-install-perl/Makefile.PL?rev=35820&op=diff
==============================================================================
--- trunk/libsysadm-install-perl/Makefile.PL (original)
+++ trunk/libsysadm-install-perl/Makefile.PL Tue May 19 05:45:19 2009
@@ -41,6 +41,11 @@
         Cwd             => 0,
         File::Temp      => 0.16,
                          }, # e.g., Module::Name => 1.1
+    META_MERGE          => {
+        resources       => {
+            repository  => 'http://github.com/mschilli/sysadm-install-perl',
+        },
+    },
     ($] >= 5.005 ?     ## Add these new keywords supported since 5.005
       (ABSTRACT_FROM  => 'lib/Sysadm/Install.pm', # retrieve abstract from module
        AUTHOR         => 'Mike Schilli <m at perlmeister.com>') : ()),

Modified: trunk/libsysadm-install-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsysadm-install-perl/README?rev=35820&op=diff
==============================================================================
--- trunk/libsysadm-install-perl/README (original)
+++ trunk/libsysadm-install-perl/README Tue May 19 05:45:19 2009
@@ -1,5 +1,5 @@
 ######################################################################
-    Sysadm::Install 0.27
+    Sysadm::Install 0.28
 ######################################################################
 
 NAME

Modified: trunk/libsysadm-install-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsysadm-install-perl/debian/changelog?rev=35820&op=diff
==============================================================================
--- trunk/libsysadm-install-perl/debian/changelog (original)
+++ trunk/libsysadm-install-perl/debian/changelog Tue May 19 05:45:19 2009
@@ -1,11 +1,17 @@
-libsysadm-install-perl (0.27-2) UNRELEASED; urgency=low
+libsysadm-install-perl (0.28-1) UNRELEASED; urgency=low
 
+  [ gregor herrmann ]
   * debian/control: Changed: Switched Vcs-Browser field to ViewSVN
     (source stanza).
   * debian/control: Added: ${misc:Depends} to Depends: field.
   * Remove Florian Ragwitz from Uploaders (closes: #523267).
 
- -- gregor herrmann <gregoa at debian.org>  Sun, 16 Nov 2008 20:47:28 +0100
+  [ Ryan Niebur ]
+  * New upstream release
+  * Add myself to Uploaders
+  * Debian Policy 3.8.1
+
+ -- Ryan Niebur <ryanryan52 at gmail.com>  Mon, 18 May 2009 22:45:12 -0700
 
 libsysadm-install-perl (0.27-1) unstable; urgency=low
 

Modified: trunk/libsysadm-install-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsysadm-install-perl/debian/control?rev=35820&op=diff
==============================================================================
--- trunk/libsysadm-install-perl/debian/control (original)
+++ trunk/libsysadm-install-perl/debian/control Tue May 19 05:45:19 2009
@@ -5,8 +5,8 @@
 Build-Depends-Indep: perl (>= 5.8.0-7), liblog-log4perl-perl, libwww-perl,
  libarchive-tar-perl, libterm-readkey-perl
 Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
-Uploaders: gregor herrmann <gregoa at debian.org>
-Standards-Version: 3.8.0
+Uploaders: gregor herrmann <gregoa at debian.org>, Ryan Niebur <ryanryan52 at gmail.com>
+Standards-Version: 3.8.1
 Homepage: http://search.cpan.org/dist/Sysadm-Install/
 Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libsysadm-install-perl/
 Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libsysadm-install-perl/

Modified: trunk/libsysadm-install-perl/lib/Sysadm/Install.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsysadm-install-perl/lib/Sysadm/Install.pm?rev=35820&op=diff
==============================================================================
--- trunk/libsysadm-install-perl/lib/Sysadm/Install.pm (original)
+++ trunk/libsysadm-install-perl/lib/Sysadm/Install.pm Tue May 19 05:45:19 2009
@@ -6,7 +6,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '0.27';
+our $VERSION = '0.28';
 
 use File::Copy;
 use File::Path;
@@ -236,15 +236,21 @@
 ###############################################
 sub download {
 ###############################################
-
-    local($Log::Log4perl::caller_depth) += 1;
-
-    INFO "download $_[0]";
-
-    _confirm("Downloading $_[0] => ", basename($_[0])) or return 1;
-
-    getstore($_[0], basename($_[0])) or 
+    my($url) = @_;
+
+    local($Log::Log4perl::caller_depth) += 1;
+
+    INFO "download $url";
+
+    _confirm("Downloading $url => ", basename($url)) or return 1;
+
+    my $rc = getstore($url, basename($_[0]));
+    
+    if($rc != RC_OK) {
         get_logger("")->logcroak("Cannot download $_[0] ($!)");
+    }
+
+    return 1;
 }
 
 =pod

Modified: trunk/libsysadm-install-perl/t/007fs.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libsysadm-install-perl/t/007fs.t?rev=35820&op=diff
==============================================================================
--- trunk/libsysadm-install-perl/t/007fs.t (original)
+++ trunk/libsysadm-install-perl/t/007fs.t Tue May 19 05:45:19 2009
@@ -17,18 +17,22 @@
 
 ok(1, "loading ok");
 
-rmf "$TEST_DIR/tmp";
+SKIP: {
 
-my $read = fs_read_open("$TEST_DIR");
-my $cpio = join '', <$read>;
-close $read;
+    rmf "$TEST_DIR/tmp";
+    if(!bin_find("cpio")) {
+        skip "No cpio on this system", 1;
+    }
 
-#print "Length: ", length $cpio, "\n";
+    my $read = fs_read_open("$TEST_DIR");
+    my $cpio = join '', <$read>;
+    close $read;
 
-my $write = fs_write_open("$TEST_DIR/tmp");
-print $write $cpio;
-close $write;
+    my $write = fs_write_open("$TEST_DIR/tmp");
+    print $write $cpio;
+    close $write;
 
-ok(-f "$TEST_DIR/007fs.t", "cpio worked");
+    ok(-f "$TEST_DIR/007fs.t", "cpio worked");
 
-rmf "$TEST_DIR/tmp";
+    rmf "$TEST_DIR/tmp";
+}




More information about the Pkg-perl-cvs-commits mailing list