Parent Directory
| 
Revision Log
| 
Patch
| revision 1.1 by wakaba, Thu Sep 18 07:42:58 2008 UTC | revision 1.2 by wakaba, Tue Oct 14 07:40:52 2008 UTC | |
|---|---|---|
| # | Line 27 sub execute_test ($$$) { | Line 27 sub execute_test ($$$) { |
| 27 | if ($v =~ s/^([A-Za-z0-9-]+)//) { | if ($v =~ s/^([A-Za-z0-9-]+)//) { |
| 28 | $field_name = $1; | $field_name = $1; |
| 29 | } | } |
| 30 | if ($v =~ s/^([^\x0A]*)\x0A//) { | if ($v =~ s/^([^\x0A]*)(?:\x0A|$)//) { |
| 31 | push @field_opt, grep {length $_} split /[\x09\x20]+/, $1; | push @field_opt, grep {length $_} split /[\x09\x20]+/, $1; |
| 32 | } | } |
| 33 |
|
||||||||
| admin@suikawiki.org | ViewVC Help |
| Powered by ViewVC 1.1.24 |