Skip to content
Permalink
Browse files

fixed TInterfaceFactory.InterfaceURI content regression

  • Loading branch information...
Arnaud Bouchez
Arnaud Bouchez committed Aug 1, 2019
1 parent af977e2 commit 8a55fb3bf2d4cffeb779dd19a8be18e227188f2f
Showing with 3 additions and 3 deletions.
  1. +2 −2 SQLite3/mORMot.pas
  2. +1 −1 SynopseCommit.inc
'%.Create: % has no GUID',[self,aInterface^.Name]);
fInterfaceName := ToUTF8(fInterfaceTypeInfo^.Name);
fInterfaceURI := fInterfaceName;
if fInterfaceName[1] in ['i','I'] then
delete(fInterfaceName,1,1);
if fInterfaceURI[1] in ['i','I'] then
delete(fInterfaceURI,1,1);
// retrieve all interface methods (recursively including ancestors)
fMethod.InitSpecific(TypeInfo(TServiceMethodDynArray),fMethods,djRawUTF8,
@fMethodsCount,true);
@@ -1 +1 @@
'1.18.5302'
'1.18.5303'

0 comments on commit 8a55fb3

Please sign in to comment.
You can’t perform that action at this time.