indent level not correctly reset when error happens in html

[pzinn]

sample example. the problem can get a lot worse if the error is nested deep inside some Hypertext, resulting in unreadable html output and making debugging hard.

i1 : needsPackage"Text"

o1 = Text

o1 : Package

i2 : html DIV "a"

o2 = <div>
     a</div>


i3 : a=new Type of List; html a := x -> 1/0; b=new a;

i6 : new VerticalList from {b}

o6 = {{}}

o6 : VerticalList

i7 : html oo
stdio:3:36:(3):[17]: error: division by zero

i8 : html DIV "a"

o8 =     <div>
     a    </div>

[mahrud]

This doesn't affect how the html is displayed, right? I added the indentation mainly as a debugging purpose, so to me the fact that the indentation is awkward is a feature that indicates "hey something went wrong".

Also, for what it's worth the html DIV "a" output looks weird because you're missing one hierarchy in the middle, e.g. this looks fine:

i5 : html DIV PARA "a"

o5 = <div>
       <p>a</p>
     </div>

[pzinn]

there's nothing wrong with having text directly inside a <div>. Having a <p> inside a <div> is overkill unless there's a good reason to do so (e.g., the <div> has multiple descendants, which is not the case here).