Parent Directory
| 
Revision Log
| 
Patch
| revision 1.10 by wakaba, Tue Mar 26 05:41:16 2002 UTC | revision 1.11 by wakaba, Tue Mar 26 15:19:53 2002 UTC | |
|---|---|---|
| # | Line 420 sub fold ($$;$) { | Line 420 sub fold ($$;$) { |
| 420 | # next split a whitespace | # next split a whitespace |
| 421 | # else we are looking at a single word and probably don't want to split | # else we are looking at a single word and probably don't want to split |
| 422 | my $x = ""; | my $x = ""; |
| 423 | $x .= "$1\n " | $x .= "$1\n " |
| 424 | while($string =~ s/^$REG{WSP}*( | while($string =~ s/^$REG{WSP}*( |
| 425 | [^"]{$min,$max}?[\,\;] | [^"]{$min,$max}?[\,\;] |
| 426 | |[^"]{1,$max}$REG{WSP} | |[^"]{1,$max}$REG{WSP} |
|
||||||||
| admin@suikawiki.org | ViewVC Help |
| Powered by ViewVC 1.1.24 |