diff options
| author | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2008-02-27 21:55:55 +0100 |
|---|---|---|
| committer | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2008-02-27 21:55:55 +0100 |
| commit | 630dec616a7316ff19e345dea8e07de7b1c5f9eb (patch) | |
| tree | 2db93e09d73832d5a1a2f4fbced37bb9fc680b8a /lib/LXRng/Web.pm | |
| parent | aab0799e5de4a7f099c22cd6ee838a38436018d7 (diff) | |
Enclose qstring.
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 13867cc..0c48972 100644 --- a/lib/LXRng/Web.pm +++ b/lib/LXRng/Web.pm @@ -834,10 +834,11 @@ sub handle { /^[+ ](search|code|ident|file|text|ambig)(?:=(.*)|)/) { my $qstring = $2 || $context->param('search'); + $qstring =~ s/\"/\\x22/g; search_result($context, $template, $query, search($context, $template, $1, $2)); $context->path(''); - return $qstring; + return qq{"$qstring"}; } else { source($context, $template, $query); |