Diff for libcfg+/Attic/db-html2man between version 1.16 and 1.17
version 1.16, 2002/09/06 00:38:04 |
version 1.17, 2002/09/09 01:45:02 |
Line 31 function remove_tag(s, reg) |
|
Line 31 function remove_tag(s, reg) |
|
return s; |
return s; |
} # }}} |
} # }}} |
|
|
function complete_xref(str, reg) |
function complete_xref(str) |
{ # {{{ |
{ # {{{ |
reg1 = sprintf("<%s[^>]*>", reg); |
reg = "<xref[^>]*$"; |
|
|
while (str !~ reg1) { |
while (str ~ reg) { |
# printf "BEFORE = '%s'\n", str; |
# printf "BEFORE = '%s'\n", str; |
getline; |
getline; |
str = sprintf("%s %s", str, $0); |
str = sprintf("%s %s", str, $0); |
Line 48 function complete_xref(str, reg) |
|
Line 48 function complete_xref(str, reg) |
|
|
|
function handle_xref(str) |
function handle_xref(str) |
{ # {{{ |
{ # {{{ |
str = complete_xref(str, "xref"); |
while (str ~ "<xref") { |
|
str = complete_xref(str); |
# now we substitute tag <xref ...> with apropriate ID |
# now we substitute tag <xref ...> with apropriate ID |
id = find_id(str); |
id = find_id(str); |
sub(/<xref[^>]*>/, sprintf("%s", get_field(id, 5)), str); |
sub(/<xref[^>]*>/, sprintf("%s", get_field(id, 5)), str); |
|
} |
print str; |
print str; |
} # }}} |
} # }}} |
|
|
Platon Group <platon@platon.org> http://platon.org/
|
|