do not record comments twice.

This commit is contained in:
espie 2003-06-30 11:53:37 +00:00
parent 297d9e1225
commit 6caef06ee4

View File

@ -1,6 +1,6 @@
#!/usr/bin/perl -w
# $OpenBSD: make-plist,v 1.26 2003/06/30 11:49:41 espie Exp $
# $OpenBSD: make-plist,v 1.27 2003/06/30 11:53:37 espie Exp $
# Copyright (c) 1999 Marc Espie
#
@ -98,6 +98,7 @@ sub annotate
} else {
$annotated->add($_, [ $name, $newfh, 'comment'] );
}
next;
} elsif (m/^\@dirrm\s+/) {
$_=$';
$annotated_dir->add($_, [ $name, $newfh ]);