Parent Directory
| 
Revision Log
| 
Patch
| revision 1.6 by wakaba, Thu Jul 10 06:13:27 2008 UTC | revision 1.7 by wakaba, Fri Jul 11 10:42:26 2008 UTC | |
|---|---|---|
| # | Line 43 my %pattern; | Line 43 my %pattern; |
| 43 | my ($en, $ja) = split /\n#ja\n/, $_; | my ($en, $ja) = split /\n#ja\n/, $_; |
| 44 | if ($en =~ s/^#en\n//) { | if ($en =~ s/^#en\n//) { |
| 45 | $data{normalize ($en)} = $ja; | $data{normalize ($en)} = $ja; |
| 46 | } elsif ($en =~ s/^#regexp\n//) { | } elsif ($en =~ s/^#pattern\n//) { |
| 47 | $pattern{create_pattern1 (normalize ($en))} = $ja; | $pattern{create_pattern1 (normalize ($en))} = $ja; |
| 48 | } | } |
| 49 | } | } |
|
||||||||
| admin@suikawiki.org | ViewVC Help |
| Powered by ViewVC 1.1.24 |