ignore details of new @comment VARS:, to be used for better make-plist.

This commit is contained in:
espie 2008-04-12 13:09:58 +00:00
parent 2c22929416
commit 9106e40ed0

View File

@ -1,6 +1,6 @@
#! /usr/bin/perl #! /usr/bin/perl
# $OpenBSD: register-plist,v 1.16 2007/06/16 12:14:53 espie Exp $ # $OpenBSD: register-plist,v 1.17 2008/04/12 13:09:58 espie Exp $
# Copyright (c) 2005 # Copyright (c) 2005
# Marc Espie. All rights reserved. # Marc Espie. All rights reserved.
# Redistribution and use in source and binary forms, with or without # Redistribution and use in source and binary forms, with or without
@ -132,6 +132,17 @@ sub forget_details
$self->{name} =~ s/\d+\.\d+$/0.0/; $self->{name} =~ s/\d+\.\d+$/0.0/;
} }
package OpenBSD::PackingElement::Comment;
sub forget_details
{
my $self = shift;
if ($self->{name} =~ m/^VARS:/) {
$self->{name} = 'VARS';
}
}
package OpenBSD::PackingElement::CVSTag; package OpenBSD::PackingElement::CVSTag;
# XXX needed to avoid CVS expansion # XXX needed to avoid CVS expansion