From 8ff4b4e616c1f63ec678fbc3f8a5853a176a3b9b Mon Sep 17 00:00:00 2001 From: fukachan Date: Sun, 8 Apr 2001 13:25:37 +0000 Subject: relocate error() et. al. definitions for each module to have each handlers within under the hierarchy. --- fml/lib/File/Sequence.pm | 4 ++-- fml/lib/File/SimpleLock.pm | 6 +++--- 2 files changed, 5 insertions(+), 5 deletions(-) (limited to 'fml/lib/File') diff --git a/fml/lib/File/Sequence.pm b/fml/lib/File/Sequence.pm index b8e59a9e..e42a3801 100644 --- a/fml/lib/File/Sequence.pm +++ b/fml/lib/File/Sequence.pm @@ -5,14 +5,14 @@ # redistribute it and/or modify it under the same terms as Perl itself. # # $Id$ -# $FML$ +# $FML: Sequence.pm,v 1.6 2001/04/03 09:31:27 fukachan Exp $ # package File::Sequence; use strict; use vars qw(@ISA @EXPORT @EXPORT_OK); use Carp; -use ErrorMessages::Status qw(error_set error error_clear); +use ErrorStatus qw(error_set error error_clear); =head1 NAME diff --git a/fml/lib/File/SimpleLock.pm b/fml/lib/File/SimpleLock.pm index afc9cf54..4b546d2e 100644 --- a/fml/lib/File/SimpleLock.pm +++ b/fml/lib/File/SimpleLock.pm @@ -3,7 +3,7 @@ # Copyright (C) 2000 Ken'ichi Fukamachi # # $Id$ -# $FML$ +# $FML: SimpleLock.pm,v 1.6 2001/04/03 09:31:27 fukachan Exp $ # package File::SimpleLock; @@ -11,7 +11,7 @@ package File::SimpleLock; use vars qw(%LockedFileHandle %FileIsLocked @ISA $Error); use strict; use Carp; -use ErrorMessages::Status qw(error_set error error_clear); +use ErrorStatus qw(error_set error error_clear); =head1 NAME @@ -137,7 +137,7 @@ sub _simple_funlock =head1 SEE ALSO L, -L, +L, =head1 AUTHOR -- cgit v1.2.1