1 files changed, 8 insertions, 48 deletions

diff --git a/rt/lib/RT/Action/Generic.pm b/rt/lib/RT/Action/Generic.pm
index 007d299c7..ecfd4ab1a 100755
--- a/rt/lib/RT/Action/Generic.pm
+++ b/rt/lib/RT/Action/Generic.pm
@@ -1,26 +1,7 @@
-# BEGIN LICENSE BLOCK
-# 
-# Copyright (c) 1996-2003 Jesse Vincent <jesse@bestpractical.com>
-# 
-# (Except where explictly superceded by other copyright notices)
-# 
-# This work is made available to you under the terms of Version 2 of
-# the GNU General Public License. A copy of that license should have
-# been provided with this software, but in any event can be snarfed
-# from www.gnu.org.
-# 
-# This work is distributed in the hope that it will be useful, but
-# WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-# General Public License for more details.
-# 
-# Unless otherwise specified, all modifications, corrections or
-# extensions to this work which alter its source code become the
-# property of Best Practical Solutions, LLC when submitted for
-# inclusion in the work.
-# 
-# 
-# END LICENSE BLOCK
+# $Header: /home/cvs/cvsroot/freeside/rt/lib/RT/Action/Generic.pm,v 1.1 2002-08-12 06:17:07 ivan Exp $
+# (c) 1996-2000 Jesse Vincent <jesse@fsck.com>
+# This software is redistributable under the terms of the GNU GPL
+
 =head1 NAME
 
   RT::Action::Generic - a generic baseclass for RT Actions
@@ -35,6 +16,7 @@
 
 =begin testing
 
+ok (require RT::TestHarness);
 ok (require RT::Action::Generic);
 
 =end testing
@@ -43,8 +25,6 @@ ok (require RT::Action::Generic);
 
 package RT::Action::Generic;
 
-use strict;
-
 # {{{ sub new 
 sub new  {
   my $proto = shift;
@@ -56,13 +36,6 @@ sub new  {
 }
 # }}}
 
-# {{{ sub new 
-sub loc {
-    my $self = shift;
-    return $self->{'ScripObj'}->loc(@_);
-}
-# }}}
-
 # {{{ sub _Init 
 sub _Init  {
   my $self = shift;
@@ -114,13 +87,6 @@ sub TemplateObj  {
 }
 # }}}
 
-# {{{ sub ScripObj
-sub ScripObj  {
-  my $self = shift;
-  return($self->{'ScripObj'});
-}
-# }}}
-
 # {{{ sub Type
 sub Type  {
   my $self = shift;
@@ -136,7 +102,7 @@ sub Type  {
 # {{{ sub Commit 
 sub Commit  {
   my $self = shift;
-  return(0, $self->loc("Commit Stubbed"));
+  return(0,"Commit Stubbed");
 }
 # }}}
 
@@ -146,7 +112,7 @@ sub Commit  {
 # {{{ sub Describe 
 sub Describe  {
   my $self = shift;
-  return $self->loc("No description for [_1]", ref $self);
+  return ("No description for " . ref $self);
 }
 # }}}
 
@@ -156,7 +122,7 @@ sub Describe  {
 # {{{ sub Prepare 
 sub Prepare  {
   my $self = shift;
-  return (0, $self->loc("Prepare Stubbed"));
+  return (0,"Prepare Stubbed");
 }
 # }}}
 
@@ -186,10 +152,4 @@ sub DESTROY {
 }
 
 # }}}
-
-eval "require RT::Action::Generic_Vendor";
-die $@ if ($@ && $@ !~ qr{^Can't locate RT/Action/Generic_Vendor.pm});
-eval "require RT::Action::Generic_Local";
-die $@ if ($@ && $@ !~ qr{^Can't locate RT/Action/Generic_Local.pm});
-
 1;