[interchange-cvs] interchange - danb modified lib/Vend/File.pm
interchange-core@icdevgroup.org
interchange-core@icdevgroup.org
Sat Apr 5 03:44:00 2003
User: danb
Date: 2003-04-05 08:43:05 GMT
Modified: lib/Vend File.pm
Log:
* Namespacing fix.
Revision Changes Path
2.7 +4 -4 interchange/lib/Vend/File.pm
rev 2.7, prev_rev 2.6
Index: File.pm
===================================================================
RCS file: /var/cvs/interchange/lib/Vend/File.pm,v
retrieving revision 2.6
retrieving revision 2.7
diff -u -r2.6 -r2.7
--- File.pm 5 Apr 2003 01:58:48 -0000 2.6
+++ File.pm 5 Apr 2003 08:43:05 -0000 2.7
@@ -1,6 +1,6 @@
# Vend::File - Interchange file functions
#
-# $Id: File.pm,v 2.6 2003/04/05 01:58:48 mheins Exp $
+# $Id: File.pm,v 2.7 2003/04/05 08:43:05 danb Exp $
#
# Copyright (C) 1996-2002 Red Hat, Inc. <interchange@redhat.com>
#
@@ -52,7 +52,7 @@
use Vend::Util;
use subs qw(logError logGlobal);
use vars qw($VERSION @EXPORT @EXPORT_OK $errstr);
-$VERSION = substr(q$Revision: 2.6 $, 10);
+$VERSION = substr(q$Revision: 2.7 $, 10);
sub writefile {
my($file, $data, $opt) = @_;
@@ -305,12 +305,12 @@
sub set_lock_type {
if ($Global::LockType eq 'none') {
- logDebug("using NO locking");
+ ::logDebug("using NO locking");
$lock_function = sub {1};
$unlock_function = sub {1};
}
elsif ($Global::LockType =~ /fcntl/i) {
- logDebug("using fcntl(2) locking");
+ ::logDebug("using fcntl(2) locking");
$lock_function = \&fcntl_lock;
$unlock_function = \&fcntl_unlock;
}