[Rt-commit] rt branch, 4.0/clean-interface-cli, created. rt-4.0.0rc6-138-g5a95b5c

[Shawn Moore]

The branch, 4.0/clean-interface-cli has been created
        at  5a95b5c0f697b71fc55c81f0cbb220f1a118341f (commit)

- Log -----------------------------------------------------------------
commit 5a95b5c0f697b71fc55c81f0cbb220f1a118341f
Author: Shawn M Moore <sartak at bestpractical.com>
Date:   Thu Mar 17 21:30:13 2011 -0400

    Clean up some really old cruft from RT::Interface::CLI

diff --git a/lib/RT/Interface/CLI.pm b/lib/RT/Interface/CLI.pm
index 8a93d07..f98d2d5 100644
--- a/lib/RT/Interface/CLI.pm
+++ b/lib/RT/Interface/CLI.pm
@@ -45,26 +45,12 @@
 # those contributions and any derivatives thereof.
 #
 # END BPS TAGGED BLOCK }}}
-
+package RT::Interface::CLI;
 use strict;
-
 use RT;
-package RT::Interface::CLI;
-
 
-
-BEGIN {
-    use base 'Exporter';
-    use vars qw ($VERSION  @EXPORT @EXPORT_OK %EXPORT_TAGS);
-    
-    # set the version for version checking
-    $VERSION = do { my @r = (q$Revision: 1.2.2.1 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; # must be all one line, for MakeMaker
-
-    # your exported package globals go here,
-    # as well as any optionally exported functions
-    @EXPORT_OK   = qw(&CleanEnv 
-		      &GetCurrentUser &GetMessageContent &debug &loc);
-}
+use base 'Exporter';
+our @EXPORT_OK = qw(CleanEnv GetCurrentUser GetMessageContent debug loc);
 
 =head1 NAME
 

-----------------------------------------------------------------------