From 31d2cfa9a1dedc0b4c51e0ca954eaf520124e78d Mon Sep 17 00:00:00 2001
From: Maxime Coste <frrrwww@gmail.com>
Date: Wed, 12 Dec 2012 18:40:16 +0100
Subject: [PATCH] ctags.kak: avoid brackets in search pattern

---
 src/rc/ctags.kak | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/rc/ctags.kak b/src/rc/ctags.kak
index 0d2ad0e6..13e2c1cc 100644
--- a/src/rc/ctags.kak
+++ b/src/rc/ctags.kak
@@ -13,8 +13,8 @@ def -shell-params \
             echo "echo tag not found ${tagname}"
         else
             menuparam=$(readtags ${tagname} | perl -i -ne '
-                /([^\t]+)\t([^\t]+)\t\/\^(.*)\$\// and print "%{$2 [$3]} %{try %{ edit %{$2}; exec %{/\\Q$3<ret><a-c>} } catch %{ echo %{unable to find tag} } } ";
-                /([^\t]+)\t([^\t]+)\t(\d+)/        and print "%{$2:$3} %{edit %{$2} %{$3}}";
+                /([^\t]+)\t([^\t]+)\t\/\^([^{}]*).*\$\// and print "%{$2 [$3]} %{try %{ edit %{$2}; exec %{/\\Q$3<ret><a-c>} } catch %{ echo %{unable to find tag} } } ";
+                /([^\t]+)\t([^\t]+)\t(\d+)/              and print "%{$2:$3} %{edit %{$2} %{$3}}";
             ')
 
             if [[ -z "${menuparam}" ]]; then