+# This module is part of debbugs, and is released
+# under the terms of the GPL version 2, or any later
+# version at your option.
+# See the file README and COPYING for more information.
+#
+# [Other people have contributed to this file; their copyrights should
+# go here too.]
+
package Debbugs::Versions;
+use warnings;
+
use strict;
=head1 NAME
=cut
-sub new ($$)
+sub new
{
my $this = shift;
my $class = ref($this) || $this;
=cut
-sub isancestor ($$$)
+sub isancestor
{
my $self = shift;
my $ancestor = shift;
=cut
-sub leaves ($)
+sub leaves
{
my $self = shift;
=cut
-sub merge ($@)
+sub merge
{
my $self = shift;
return unless @_;
=cut
-sub load ($*)
+sub load
{
my $self = shift;
my $fh = shift;
=cut
-sub save ($*)
+sub save
{
my $self = shift;
my $fh = shift;
=cut
-sub buggy ($$$$)
+sub buggy
{
my $self = shift;
my $version = shift;
=cut
-sub allstates ($$$;$)
+sub allstates
{
my $self = shift;
my $found = shift;