Prevent uninitialized warning when no enable_client_secret is true and

mulletboy2 · mulletboy2 · commit 6e944264d0e8 · 2015-08-26T09:43:01.000+01:00
no client_secret is specified in the request
diff --git a/lib/CatalystX/OAuth2/Store/DBIC.pm b/lib/CatalystX/OAuth2/Store/DBIC.pm
@@ -117,7 +117,7 @@ sub find_code_from_refresh {
 sub verify_client_secret {
   my ( $self, $client_id, $access_secret ) = @_;
   my $client = $self->find_client($client_id);
-  return $client->client_secret eq $access_secret;
+  return ($client->client_secret||'') eq ($access_secret||'');
 }
 
 sub verify_client_token {

Original file line number	Diff line number	Diff line change
`@@ -117,7 +117,7 @@ sub find_code_from_refresh {`
`117`	`117`	`sub verify_client_secret {`
`118`	`118`	`my ( $self, $client_id, $access_secret ) = @_;`
`119`	`119`	`my $client = $self->find_client($client_id);`
`120`		`- return $client->client_secret eq $access_secret;`
	`120`	`+ return ($client->client_secret\|\|'') eq ($access_secret\|\|'');`
`121`	`121`	`}`
`122`	`122`
`123`	`123`	`sub verify_client_token {`