From ccbee6b7cb47738b120eb1847dd14da331915dcf Mon Sep 17 00:00:00 2001
From: Thadeu Lima de Souza Cascardo <cascardo@cascardo.eti.br>
Date: Fri, 24 Apr 2015 07:03:19 -0300
Subject: [PATCH] Include packages with priority important or higher.

Packages with Priority required, standard and important are now included
in the first set of packages to visit. That doesn't increase too much in
relation to the total set when considering only Essential and
build-essential.
---
 debsort.pl | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/debsort.pl b/debsort.pl
index 969f6f7..5f48263 100644
--- a/debsort.pl
+++ b/debsort.pl
@@ -128,6 +128,12 @@ my @vsource = ();
 for my $i (keys %essential) {
 	push @visit, $i;
 }
+for my $i (@packages) {
+	if (defined($priority{$i}) and ($priority{$i} eq "required" ||
+	    $priority{$i} eq "standard" || $priority{$i} eq "important")) {
+		push @visit, $i;
+	}
+}
 push @visit, "build-essential";
 
 while (@visit) {
-- 
2.20.1