diff options
| author | fukachan <fukachan> | 2002-11-23 15:20:00 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-11-23 15:20:00 +0000 |
| commit | 7e697cb1ae29ae8c5b141935fe4c14029372ba8a (patch) | |
| tree | 5d2fd2f2872c0882cefa8e1d660aaabb56d2f028 /fml/lib/FML/Command | |
| parent | 3287570ab8236ea0354f08f2c25e42e8ea747722 (diff) | |
| download | fml8-7e697cb1ae29ae8c5b141935fe4c14029372ba8a.tar.gz fml8-7e697cb1ae29ae8c5b141935fe4c14029372ba8a.tar.bz2 fml8-7e697cb1ae29ae8c5b141935fe4c14029372ba8a.zip | |
basic_variables() -> basic_variable() for FML::Restriction::Base
Diffstat (limited to 'fml/lib/FML/Command')
| -rw-r--r-- | fml/lib/FML/Command/Admin/dir.pm | 4 | ||||
| -rw-r--r-- | fml/lib/FML/Command/Admin/file.pm | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/fml/lib/FML/Command/Admin/dir.pm b/fml/lib/FML/Command/Admin/dir.pm index fe17924f..46afa447 100644 --- a/fml/lib/FML/Command/Admin/dir.pm +++ b/fml/lib/FML/Command/Admin/dir.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: dir.pm,v 1.5 2002/09/11 23:18:07 fukachan Exp $ +# $FML: dir.pm,v 1.6 2002/09/22 14:56:44 fukachan Exp $ # package FML::Command::Admin::dir; @@ -67,7 +67,7 @@ sub process use FML::Restriction::Base; my $safe = new FML::Restriction::Base; - my $regexp = $safe->basic_variables(); + my $regexp = $safe->basic_variable(); my $dirreg = $regexp->{ directory }; # analyze ... diff --git a/fml/lib/FML/Command/Admin/file.pm b/fml/lib/FML/Command/Admin/file.pm index 0ccbaf13..9851e33f 100644 --- a/fml/lib/FML/Command/Admin/file.pm +++ b/fml/lib/FML/Command/Admin/file.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: file.pm,v 1.5 2002/09/11 23:18:07 fukachan Exp $ +# $FML: file.pm,v 1.6 2002/09/22 14:56:45 fukachan Exp $ # package FML::Command::Admin::file; @@ -74,7 +74,7 @@ sub process use FML::Restriction::Base; my $safe = new FML::Restriction::Base; - my $regexp = $safe->basic_variables(); + my $regexp = $safe->basic_variable(); my $filereg = $regexp->{ file }; # argv = command subcommand args ... |