this can happen, and it's perfectly sensible in fact
This commit is contained in:
parent
02481d9d12
commit
adb07d8b6f
@ -1,5 +1,5 @@
|
||||
#! /usr/bin/perl
|
||||
# $OpenBSD: make-plist,v 1.118 2008/10/28 14:32:08 espie Exp $
|
||||
# $OpenBSD: make-plist,v 1.119 2008/10/29 11:26:02 espie Exp $
|
||||
# Copyright (c) 2004-2008 Marc Espie <espie@openbsd.org>
|
||||
#
|
||||
# Permission to use, copy, modify, and distribute this software for any
|
||||
@ -802,7 +802,8 @@ sub handle_file
|
||||
my $p = $item->{plist}->{replacement};
|
||||
if ($file->type eq 'directory' &&
|
||||
$p->{mtree}->{$file->path}) {
|
||||
print "This should not happen !!!\n";
|
||||
print "Found out old directory in ", $p->{filename},
|
||||
": ", $file->path, " (mtree)\n";
|
||||
next;
|
||||
}
|
||||
my $short = short_name($file, $p);
|
||||
@ -944,11 +945,6 @@ if (($default->{wantshared} || (defined $default->{shared}) && $default->{shared
|
||||
$default->{nonempty} = 1;
|
||||
}
|
||||
|
||||
#for my $k (sort keys %$foundcomments) {
|
||||
# next if defined $foundcomments->{$k}->{accounted_for};
|
||||
# print "Not accounted for: \@comment $k\n";
|
||||
#}
|
||||
|
||||
# write new info over, as joe user.
|
||||
# first we write out everything in /tmp
|
||||
# then we signal if something changed
|
||||
|
Loading…
Reference in New Issue
Block a user