From: Vincent Pit <vince@profvince.com>
Date: Sat, 2 Jan 2010 20:33:34 +0000 (+0100)
Subject: We don't need $fqn in enable()/disable()
X-Git-Tag: v0.01~3
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=03a0301f7c3c094686a5412c86319e32354a3521;p=perl%2Fmodules%2FSub-Op.git

We don't need $fqn in enable()/disable()
---

diff --git a/lib/Sub/Op.pm b/lib/Sub/Op.pm
index bb2f345..76d22da 100644
--- a/lib/Sub/Op.pm
+++ b/lib/Sub/Op.pm
@@ -242,8 +242,6 @@ sub enable {
  my $name = shift;
 
  my $pkg = @_ > 0 ? $_[0] : caller;
- my $fqn = "${pkg}::$name";
-
  my $map = _map($pkg);
 
  if (defined $map) {
@@ -272,8 +270,6 @@ sub disable {
  my $name = shift;
 
  my $pkg = @_ > 0 ? $_[0] : caller;
- my $fqn = "${pkg}::$name";
-
  my $map = _map($pkg);
 
  if (defined $map) {