summaryrefslogtreecommitdiff
path: root/scripts/controllib.pl
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/controllib.pl')
-rwxr-xr-xscripts/controllib.pl10
1 files changed, 7 insertions, 3 deletions
diff --git a/scripts/controllib.pl b/scripts/controllib.pl
index 0a084fae4..40e1552a7 100755
--- a/scripts/controllib.pl
+++ b/scripts/controllib.pl
@@ -1,7 +1,10 @@
$parsechangelog= 'dpkg-parsechangelog';
-grep($capit{lc $_}=$_, qw(Pre-Depends Standards-Version Installed-Size));
+grep($capit{lc $_}=$_, qw(Pre-Depends Standards-Version Installed-Size
+ Build-Depends Build-Indep-Depends
+ Build-Conflicts Build-Indep-Conflicts));
+
$substvar{'Format'}= 1.6;
$substvar{'Newline'}= "\n";
@@ -36,8 +39,9 @@ if(!defined($getlogin)) {
}
if (defined ($ENV{'LOGNAME'})) {
- if (!defined ($getlogin)) {
- warn (sprintf ('no utmp entry available, using value of LOGNAME ("%s")', $ENV{'LOGNAME'}));
+ if (!defined ($getlogin)) {
+ # Hmmm, do we really need this?
+ # warn (sprintf ('no utmp entry available, using value of LOGNAME ("%s")', $ENV{'LOGNAME'}));
} else {
if ($getlogin ne $ENV{'LOGNAME'}) {
warn (sprintf ('utmp entry ("%s") does not match value of LOGNAME ("%s"); using "%s"',