From db0b180498157c07847d8ff8e69bacc8f57923cc Mon Sep 17 00:00:00 2001
From: Alfredo Beaumont <alfredo.beaumont@gmail.com>
Date: Mon, 14 Jul 2008 14:53:56 +0200
Subject: [PATCH] Fix errors in new tests

---
 extra/ctags/ctags-tests.factor | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/extra/ctags/ctags-tests.factor b/extra/ctags/ctags-tests.factor
index 700b897657..c54fe99217 100644
--- a/extra/ctags/ctags-tests.factor
+++ b/extra/ctags/ctags-tests.factor
@@ -3,17 +3,17 @@ IN: ctags.tests
 
 [ t ] [
   91
-  { { if  { "resource:extra/unix/unix.factor" 91 } } } ctag-lineno =
+  { if  { "resource:extra/unix/unix.factor" 91 } } ctag-lineno =
 ] unit-test
 
 [ t ] [
   "resource:extra/unix/unix.factor"
-  { { if  { "resource:extra/unix/unix.factor" 91 } } } ctag-path =
+  { if  { "resource:extra/unix/unix.factor" 91 } } ctag-path =
 ] unit-test
 
 [ t ] [
-  if
-  { { if  { "resource:extra/unix/unix.factor" 91 } } } ctag-word =
+  \ if
+  { if  { "resource:extra/unix/unix.factor" 91 } } ctag-word =
 ] unit-test
 
 [ t ] [