Bugfix in error handling.

6e5852e5 · Jonathon Duerig · 788e08f0 · 6e5852e5
Commit 6e5852e5 authored Jul 30, 2012 by Jonathon Duerig
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 4 deletions

protogeni/lib/GeniCM.pm.in protogeni/lib/GeniCM.pm.in +5 -4

No files found.
--- a/protogeni/lib/GeniCM.pm.in
+++ b/protogeni/lib/GeniCM.pm.in
@@ -1699,10 +1699,11 @@ sub GetTicketAuxAux($$$$$$$$$)
 		    my $edgeurn = GetHopLinkID($edgehop);
 		    my $edgewire = Interface::Wire->Lookup($edgeurn);
 		    if (!defined($edgewire)) {
-			GeniResponse->Create(GENIRESPONSE_ERROR, undef,
-					     "$lanname: unknown ".
-					     "external_interface for ".
-					     $edgeurn);
+			$response = 
+			    GeniResponse->Create(GENIRESPONSE_ERROR, undef,
+						 "$lanname: unknown ".
+						 "external_interface for ".
+						 $edgeurn);
 			goto bad;
 		    }