Diff for libcfg+/Attic/db-get-id between version 1.2 and 1.3
version 1.2, 2002/09/05 23:08:59 |
version 1.3, 2002/09/05 23:24:44 |
Line 19 function compete_tag(reg) |
|
Line 19 function compete_tag(reg) |
|
str = sprintf("%s %s", str, $0); |
str = sprintf("%s %s", str, $0); |
# printf "AFTER = '%s'\n", str; |
# printf "AFTER = '%s'\n", str; |
} |
} |
if (str ~ reg && desc == "") { |
if (str ~ reg && str ~ /id=['"]/ && desc == "") { |
desc = str; |
desc = str; |
reg1 = sprintf("^.*<%s[^>]*>", reg); |
sub(/\t+/, " ", desc); |
reg2 = sprintf("[ \t]*</%s>.*$", reg); |
reg1 = sprintf("^.*<%s[^>]*> *", reg); |
sub(reg1, "", desc); |
reg2 = sprintf(" *</%s>.*$", reg); |
sub(reg2, "", desc); |
if (!sub(reg1, "", desc)) { desc = ""; } |
|
if (!sub(reg2, "", desc)) { desc = ""; } |
} |
} |
|
|
} |
} |
Platon Group <platon@platon.org> http://platon.org/
|
|