From 14ff309106dbf17f1a2edec46be8e73ebc5ef033 Mon Sep 17 00:00:00 2001
From: Alex Schroeder <alex@gnu.org>
Date: Tue, 6 Jun 2006 22:56:53 +0000
Subject: [PATCH] (SearchFreeTextGet): Double escape [ and ].

---
 modules/search-freetext.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/modules/search-freetext.pl b/modules/search-freetext.pl
index c11b82df..fc97efd2 100644
--- a/modules/search-freetext.pl
+++ b/modules/search-freetext.pl
@@ -40,7 +40,7 @@ sub process {
 
 package OddMuse;
 
-$ModulesDescription .= '<p>$Id: search-freetext.pl,v 1.32 2006/06/06 22:41:35 as Exp $</p>';
+$ModulesDescription .= '<p>$Id: search-freetext.pl,v 1.33 2006/06/06 22:56:53 as Exp $</p>';
 
 push(@MyRules, \&SearchFreeTextTagsRule);
 
@@ -249,7 +249,7 @@ sub SearchFreeTextGet {
   # make sure that all double quoted phrases do in fact all appear.
   # to do this, we copy page ids from @found.
   my @phrases = map { quotemeta(substr($_,1,-1)) } grep(/^"/, @wanted);
-  @phrases = map { "\[\[tag:$_\]\]" } @phrases if $tags;
+  @phrases = map { "\\[\\[tag:$_\\]\\]" } @phrases if $tags;
  PAGE: foreach (@found) {
     my ($id, $score) = ($_->[0], $_->[1]);
     if (@phrases) {