Fix exception type

moritz · moritz · commit b99fd2d689bf · 2014-10-16T21:55:08.000+02:00
diff --git a/S32-exceptions/misc.t b/S32-exceptions/misc.t
@@ -546,7 +546,7 @@ throws_like '&[doesntexist]', X::Comp, # XXX probably needs exception type fix
 
 # RT #116607
 {
-    throws_like { EVAL q[my \foo], }, X::AdHoc, # XXX adapt when typed exception is available
+    throws_like { EVAL q[my \foo], }, X::Syntax::Term::MissingInitializer,
        message => 'Term definition requires an initializer';
 }
 

Original file line number	Diff line number	Diff line change
`@@ -546,7 +546,7 @@ throws_like '&[doesntexist]', X::Comp, # XXX probably needs exception type fix`
`546`	`546`
`547`	`547`	`# RT #116607`
`548`	`548`	`{`
`549`		`- throws_like { EVAL q[my \foo], }, X::AdHoc, # XXX adapt when typed exception is available`
	`549`	`+ throws_like { EVAL q[my \foo], }, X::Syntax::Term::MissingInitializer,`
`550`	`550`	`message => 'Term definition requires an initializer';`
`551`	`551`	`}`
`552`	`552`