Skip to content

Commit

Permalink
Trim linebreak from right side of detected procedure parameters. See h…
Browse files Browse the repository at this point in the history
  • Loading branch information
ansgarbecker committed Aug 26, 2019
1 parent b49a0d7 commit e8ba05a
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion source/dbconnection.pas
Expand Up @@ -5504,7 +5504,7 @@ procedure TDBConnection.ParseRoutineStructure(Obj: TDBObject; Parameters: TRouti
if Param.Context = '' then if Param.Context = '' then
Param.Context := 'IN'; Param.Context := 'IN';
Param.Name := DeQuoteIdent(rx.Match[4]); Param.Name := DeQuoteIdent(rx.Match[4]);
Param.Datatype := rx.Match[5]; Param.Datatype := Trim(rx.Match[5]);
Parameters.Add(Param); Parameters.Add(Param);
if not rx.ExecNext then if not rx.ExecNext then
break; break;
Expand Down

0 comments on commit e8ba05a

Please sign in to comment.