ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/bin/pod2wiki
(Generate patch)

Comparing deliantra/Deliantra-Client/bin/pod2wiki (file contents):
Revision 1.12 by root, Tue Mar 25 02:12:36 2008 UTC vs.
Revision 1.13 by root, Sun Mar 30 04:59:43 2008 UTC

… …
218 $pod->[N_LEVEL] = 1; 218 $pod->[N_LEVEL] = 1;
219 $pod->[N_KW] = [$base]; 219 $pod->[N_KW] = [$base];
220 $pod->[N_DOC] = $para; 220 $pod->[N_DOC] = $para;
221 221
222 my @parent = ($pod); 222 my @parent = ($pod);
223 add_node $parent[-1]; 223 add_node $pod;
224 224
225 for my $idx (0 .. $#$para) { 225 for my $idx (0 .. $#$para) {
226 my $par = $para->[$idx]; 226 my $par = $para->[$idx];
227 227
228 while ($parent[-1][N_LEVEL] >= $par->[P_LEVEL]) { 228 while ($parent[-1][N_LEVEL] >= $par->[P_LEVEL]) {
… …
242 } 242 }
243} 243}
244 244
245Storable::nstore \%wiki, "docwiki.pst"; 245Storable::nstore \%wiki, "docwiki.pst";
246 246
247add_node $root;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines