From 8bfee41e214b015fe6eb8ef0c185859f5b6401a7 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sat, 14 Aug 2010 05:18:31 +0200 Subject: Add remaining error classes, sort of --- bin/efa | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'bin') diff --git a/bin/efa b/bin/efa index b7b61d4..7cd3bbb 100755 --- a/bin/efa +++ b/bin/efa @@ -114,11 +114,11 @@ else { ); } -$efa->parse(); +my $err = $efa->parse(); - -$efa->check_ambiguous(); -$efa->check_no_connections(); +if ($err and $err->isa('WWW::Efa::Error')) { + die $err->as_string(); +} my @connections = $efa->connections(); -- cgit v1.2.3