branch : pmacs2
This commit is contained in:
moculus 2008-05-13 20:42:37 +00:00
parent 635b2678d8
commit 9a87e554dc
1 changed files with 4 additions and 0 deletions

View File

@ -549,6 +549,10 @@ class PerlContext(context.Context):
stack.append(t.string) stack.append(t.string)
starting = False starting = False
elif t.name == 'delimiter' and t.string == '}': elif t.name == 'delimiter' and t.string == '}':
if not stack:
# we are totally hosed. start over. ugh.
self.build_name_map()
return
stack.pop(-1) stack.pop(-1)
if curr: if curr:
self.namelines[i] = (curr, tuple(stack)) self.namelines[i] = (curr, tuple(stack))