xml.errors: fix xml error.

diff --git a/basis/xml/errors/errors.factor b/basis/xml/errors/errors.factor
index 9c93015e9d0337de2a2e72ddf17461a552fdc21d..3b73e8a7a9b61f084d7a8fff5d908b2afdf366e9 100644 (file)
--- a/basis/xml/errors/errors.factor
+++ b/basis/xml/errors/errors.factor
@@ -52,7 +52,7 @@ TUPLE: unclosed line column tags ;
 : throw-unclosed ( -- * )
     get-line get-column
     xml-stack get rest-slice [ first name>> ] map
-    unclosed ;
+    unclosed boa throw ;
 
 XML-ERROR: bad-uri string ;