[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

[SCM] Debian package checker branch, master, updated. 2.5.3-80-g6fc8d5c



The following commit has been merged in the master branch:
commit 6fc8d5cc2954b165da2cde0fb9d47373ca25e6e5
Author: Niels Thykier <niels@thykier.net>
Date:   Wed Oct 26 15:53:04 2011 +0200

    Added missing "or fail" and normalized the errors + fixed a typo
    
    Signed-off-by: Niels Thykier <niels@thykier.net>

diff --git a/collection/index b/collection/index
index 0d2d351..38192be 100755
--- a/collection/index
+++ b/collection/index
@@ -151,7 +151,7 @@ sub index_src {
         $prefix //= '';
 
         # If there is a common prefix and it is $compname, then we use that
-        # becaues that is where they will be extracted by unpacked.
+        # because that is where they will be extracted by unpacked.
         if ($prefix ne $compname) {
             # If there is a common prefix and it is not $compname
             # then strip the prefix and add $compname (if any)
@@ -172,9 +172,9 @@ sub index_src {
                 my $filename = 'source-prefix';
                 $filename .= "-$compname" if $compname;
                 open(PREFIX, '>', $filename)
-                    or fail("cannot create $filename for $pkg: $!");
+                    or fail "opening $filename for $pkg: $!";
                 print PREFIX "$prefix\n";
-                close PREFIX;
+                close PREFIX or fail "closing $filename for $pkg: $!";
             } elsif ($compname) {
                 # Prefix with the compname (because that is where they will be
                 # unpacked to.

-- 
Debian package checker


Reply to: