diff options
| author | fukachan <fukachan> | 2004-01-21 03:45:03 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2004-01-21 03:45:03 +0000 |
| commit | eb6e9804cd01a4b91d818ba3a11b2aa7d334efa9 (patch) | |
| tree | 4969f633d045a00d2348c684bf7636cfbed7a8d5 /fml/lib/FML/Command/FileUtils.pm | |
| parent | 886810f9eebed5ef0a63e9427922d28c657f780f (diff) | |
| download | fml8-eb6e9804cd01a4b91d818ba3a11b2aa7d334efa9.tar.gz fml8-eb6e9804cd01a4b91d818ba3a11b2aa7d334efa9.tar.bz2 fml8-eb6e9804cd01a4b91d818ba3a11b2aa7d334efa9.zip | |
fix/udpate comments.
clean up.
Diffstat (limited to 'fml/lib/FML/Command/FileUtils.pm')
| -rw-r--r-- | fml/lib/FML/Command/FileUtils.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/fml/lib/FML/Command/FileUtils.pm b/fml/lib/FML/Command/FileUtils.pm index f788069f..496028eb 100644 --- a/fml/lib/FML/Command/FileUtils.pm +++ b/fml/lib/FML/Command/FileUtils.pm @@ -1,10 +1,10 @@ #-*- perl -*- # -# Copyright (C) 2002,2003 Ken'ichi Fukamachi +# Copyright (C) 2002,2003,2004 Ken'ichi Fukamachi # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: FileUtils.pm,v 1.13 2003/08/23 07:24:42 fukachan Exp $ +# $FML: FileUtils.pm,v 1.14 2003/08/29 15:33:57 fukachan Exp $ # package FML::Command::FileUtils; @@ -73,8 +73,8 @@ sub delete # Descriptions: remove files -# Arguments: OBJ($self) HASH_REF($curproc) HASH_REF($command_args) -# HASH_REF($du_args) +# Arguments: OBJ($self) +# OBJ($curproc) HASH_REF($command_args) HASH_REF($du_args) # Side Effects: none # Return Value: none sub remove @@ -88,7 +88,7 @@ sub remove my $safe = $self->{ _safe }; # chdir $ml_home_dir firstly. return ASAP if failed. - my $ml_home_dir = $config->{ ml_home_dir }; + my $ml_home_dir = $config->{ ml_home_dir }; chdir $ml_home_dir || croak("cannot chdir \$ml_home_dir"); for my $file (@$argv) { @@ -141,7 +141,7 @@ Ken'ichi Fukamachi =head1 COPYRIGHT -Copyright (C) 2002,2003 Ken'ichi Fukamachi +Copyright (C) 2002,2003,2004 Ken'ichi Fukamachi All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. |