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

lintian: r1333 - trunk/checks



Author: rra
Date: 2008-06-05 02:52:02 +0200 (Thu, 05 Jun 2008)
New Revision: 1333

Modified:
   trunk/checks/control-file
Log:
Fix formatting to make it consistent.


Modified: trunk/checks/control-file
===================================================================
--- trunk/checks/control-file	2008-06-05 00:47:48 UTC (rev 1332)
+++ trunk/checks/control-file	2008-06-05 00:52:02 UTC (rev 1333)
@@ -87,20 +87,20 @@
 # another problem.
 my @dep_fields = qw(pre-depends depends recommends suggests);
 for my $control (@binary_controls) {
-    for my $strong (0 .. ($#dep_fields - 1)) {
-        next unless $control->{$dep_fields[$strong]};
-        my $parsed = Dep::parse ($control->{$dep_fields[$strong]});
-        tag "package-depends-on-itself", $control->{package}, $dep_fields[$strong]
-            if Dep::implies($parsed, Dep::parse($control->{package}));
-        for my $weak (($strong + 1) .. $#dep_fields) {
-            next unless $control->{$dep_fields[$weak]};
-            for my $dependency (split /\s*,\s*/, $control->{$dep_fields[$weak]}) {
-                next unless $dependency;
-                tag "stronger-dependency-implies-weaker", $control->{package}, "$dep_fields[$strong] -> $dep_fields[$weak]", $dependency
-                    if Dep::implies($parsed, Dep::parse($dependency));
-            }
-        }
-    }
+	for my $strong (0 .. ($#dep_fields - 1)) {
+		next unless $control->{$dep_fields[$strong]};
+		my $parsed = Dep::parse ($control->{$dep_fields[$strong]});
+		tag "package-depends-on-itself", $control->{package}, $dep_fields[$strong]
+		    if Dep::implies($parsed, Dep::parse($control->{package}));
+		for my $weak (($strong + 1) .. $#dep_fields) {
+			next unless $control->{$dep_fields[$weak]};
+			for my $dependency (split /\s*,\s*/, $control->{$dep_fields[$weak]}) {
+				next unless $dependency;
+				tag "stronger-dependency-implies-weaker", $control->{package}, "$dep_fields[$strong] -> $dep_fields[$weak]", $dependency
+				    if Dep::implies($parsed, Dep::parse($dependency));
+			}
+		}
+	}
 }
 
 # Check that every package is in the same archive category, except that
@@ -139,4 +139,8 @@
 
 1;
 
+# Local Variables:
+# indent-tabs-mode: t
+# cperl-indent-level: 8
+# End:
 # vim: syntax=perl sw=4 ts=4 noet shiftround


Reply to: