Most of these merges are just removing unused parts of the perl modules.

[koha.git] / C4 / Stock.pm

diff --git a/C4/Stock.pm b/C4/Stock.pm
index 10fb1e1..3e83b1f 100644 (file)
--- a/C4/Stock.pm
+++ b/C4/Stock.pm
@@ -1,4 +1,4 @@
-package C4::Stock; #asummes C4/Stock.pm
+package C4::Stock; #assumes C4/Stock.pm
 
 use strict;
 require Exporter;
@@ -11,41 +11,6 @@ $VERSION = 0.01;
 
 @ISA = qw(Exporter);
 @EXPORT = qw(&stockreport);
-%EXPORT_TAGS = ( );     # eg: TAG => [ qw!name1 name2! ],
-
-# your exported package globals go here,
-# as well as any optionally exported functions
-
-@EXPORT_OK   = qw($Var1 %Hashit);
-
-
-# non-exported package globals go here
-use vars qw(@more $stuff);
-
-# initalize package globals, first exported ones
-
-my $Var1   = '';
-my %Hashit = ();
-
-
-# then the others (which are still accessible as $Some::Module::stuff)
-my $stuff  = '';
-my @more   = ();
-
-# all file-scoped lexicals must be created before
-# the functions below that use them.
-
-# file-private lexicals go here
-my $priv_var    = '';
-my %secret_hash = ();
-
-# here's a file-private function as a closure,
-# callable as &$priv_func;  it cannot be prototyped.
-my $priv_func = sub {
-  # stuff goes here.
-  };
-  
-# make all your functions, whether exported or not;
 
 sub stockreport {
   my $dbh=C4Connect;
@@ -69,3 +34,4 @@ sub stockreport {
 END { }       # module clean-up code here (global destructor)
   
     
+