From ffe1f7458444e5b3df738877dfec812ff827d930 Mon Sep 17 00:00:00 2001
From: hallgren <hallgren@chalmers.se>
Date: Wed, 21 Jan 2015 10:41:12 +0000
Subject: PGF2 & PGFService: enable callbacks for named entities and chunks in
 the c-parse & c-translate web requests

---
 src/server/PGFService.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/server')

diff --git a/src/server/PGFService.hs b/src/server/PGFService.hs
index d610df45d..b2fd4fc89 100644
--- a/src/server/PGFService.hs
+++ b/src/server/PGFService.hs
@@ -155,8 +155,8 @@ cpgfMain command (t,(pgf,pc)) =
         return $
         maybe id take mlimit . drop start # cparse
       where
-        cparse = C.parse concr cat input
-      --cparse = C.parseWithHeuristics concr cat input (-1) callbacks
+      --cparse = C.parse concr cat input
+        cparse = C.parseWithHeuristics concr cat input (-1) callbacks
         callbacks = maybe [] cb $ lookup (C.abstractName pgf) C.literalCallbacks
         cb fs = [(cat,f pgf (from,concr))|(cat,f)<-fs]
 {-
-- 
cgit v1.2.3