summaryrefslogtreecommitdiff
path: root/src/GF/Grammar/Refresh.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/GF/Grammar/Refresh.hs')
-rw-r--r--src/GF/Grammar/Refresh.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/GF/Grammar/Refresh.hs b/src/GF/Grammar/Refresh.hs
index 045fccfc0..8be951215 100644
--- a/src/GF/Grammar/Refresh.hs
+++ b/src/GF/Grammar/Refresh.hs
@@ -77,6 +77,7 @@ refreshPatt p = case p of
PSeq p' q' -> liftM2 PSeq (refreshPatt p') (refreshPatt q')
PAlt p' q' -> liftM2 PAlt (refreshPatt p') (refreshPatt q')
PRep p' -> liftM PRep (refreshPatt p')
+ PNeg p' -> liftM PNeg (refreshPatt p')
_ -> return p