renamed Posting::Handle as Posting::Admin

[selfforum.git] / selfforum-cgi / shared / Lock.pm

diff --git a/selfforum-cgi/shared/Lock.pm b/selfforum-cgi/shared/Lock.pm
index b1e42d37120dff29660152d1f7ca0f8da205e763..f7234f07d9271907af9afbb38ef2fa7a70bcfc85 100644 (file)
--- a/selfforum-cgi/shared/Lock.pm
+++ b/selfforum-cgi/shared/Lock.pm
@@ -12,14 +12,13 @@ use strict;
 
 package Lock;
 
 
 package Lock;
 

-use vars qw(@ISA @EXPORT_OK %EXPORT_TAGS $Timeout $violentTimeout $masterTimeout $iAmMaster);
+use vars qw(@EXPORT_OK %EXPORT_TAGS $Timeout $violentTimeout $masterTimeout $iAmMaster);

 
 # ====================================================
 # Funktionsexport
 # ====================================================
 
 
 # ====================================================
 # Funktionsexport
 # ====================================================
 

-require Exporter;
-@ISA         = qw(Exporter);
+use base qw(Exporter);

 
 @EXPORT_OK   = qw(lock_file unlock_file write_lock_file write_unlock_file
                   violent_unlock_file set_master_lock release_file);
 
 @EXPORT_OK   = qw(lock_file unlock_file write_lock_file write_unlock_file
                   violent_unlock_file set_master_lock release_file);