Parent Directory
| 
Revision Log
| 
Patch
| revision 1.2 by wakaba, Thu Jul 24 13:17:11 2008 UTC | revision 1.3 by wakaba, Sun Aug 10 06:15:00 2008 UTC | |
|---|---|---|
| # | Line 51 sub for_each_data_file ($) { | Line 51 sub for_each_data_file ($) { |
| 51 | next if /^_/; # editable but not-used files | next if /^_/; # editable but not-used files |
| 52 | my $data_file_name = qq[$data_dir_name$_]; | my $data_file_name = qq[$data_dir_name$_]; |
| 53 | next unless $data_file_name =~ /\Q$data_suffix\E$/; | next unless $data_file_name =~ /\Q$data_suffix\E$/; |
| 54 | $code->($data_file_name); | $code->($data_file_name, $_); |
| 55 | } | } |
| 56 | } # for_each_data_file | } # for_each_data_file |
| 57 |
|
||||||||
| admin@suikawiki.org | ViewVC Help |
| Powered by ViewVC 1.1.24 |