diff options
| author | Arne Georg Gleditsch <argggh@taniquetil.(none)> | 2009-08-20 22:42:21 +0200 |
|---|---|---|
| committer | Arne Georg Gleditsch <argggh@taniquetil.(none)> | 2009-08-20 22:42:21 +0200 |
| commit | 236cfb9a32a8daddfb0a3f4b190386046b0989d9 (patch) | |
| tree | 0040f12d9a24e7116b4d774a5cd114c9e0525a03 /lib/LXRng/Web.pm | |
| parent | 9f82ae39d86365e49333043466b1c3cad0f92190 (diff) | |
Remove junk from ident search string.
Diffstat (limited to 'lib/LXRng/Web.pm')
| -rw-r--r-- | lib/LXRng/Web.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/LXRng/Web.pm b/lib/LXRng/Web.pm index a592b9a..ba7943f 100644 --- a/lib/LXRng/Web.pm +++ b/lib/LXRng/Web.pm @@ -435,7 +435,8 @@ sub search { $template_args{'code_res'} = {'query' => $find, 'idents' => \@cooked}; } - if ($type eq 'ident') { + if ($type eq 'ident' and $find =~ /(\d+)/) { + $find = $1; my $usage = $context->config->{'usage'}; my ($symname, $symid, $ident, $refs) = $index->get_identifier_info($usage, $find, $rel_id); |