From 2fe6df85e6bdc25a3142a9c69880fd283b0091bc Mon Sep 17 00:00:00 2001
From: Michal Vaner <vorner@ucw.cz>
Date: Sat, 30 Aug 2008 11:36:23 +0200
Subject: [PATCH] Fix name of method

Resulting of using inherited one -> showing "discuss" link in toplevel
items (PCI devices and PCI classes).
---
 PciIds/Address/Toplevel.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/PciIds/Address/Toplevel.pm b/PciIds/Address/Toplevel.pm
index 0f16698..6f4836b 100644
--- a/PciIds/Address/Toplevel.pm
+++ b/PciIds/Address/Toplevel.pm
@@ -41,7 +41,7 @@ sub append( $$ ) {
 	return ( PciIds::Address::Base::new( $self->{'value'} . ( ( $self->{'value'} =~ /\/$/ ) ? '' : '/' ) . $suffix ), undef );
 }
 
-sub canAddDiscuss( $ ) { return 0; }
+sub canDiscuss( $ ) { return 0; }
 
 sub defaultRestrict( $ ) {
 	my( $self ) = @_;
-- 
2.39.2