瀏覽代碼

* Unregister routes

git-svn-id: trunk@42265 -
michael 6 年之前
父節點
當前提交
ba1fb2c0cf
共有 1 個文件被更改,包括 2 次插入0 次删除
  1. 2 0
      packages/fcl-web/src/restbridge/sqldbrestbridge.pp

+ 2 - 0
packages/fcl-web/src/restbridge/sqldbrestbridge.pp

@@ -869,6 +869,8 @@ end;
 
 
 destructor TSQLDBRestDispatcher.Destroy;
 destructor TSQLDBRestDispatcher.Destroy;
 begin
 begin
+  if RoutesRegistered then
+    UnregisterRoutes;
   Authenticator:=Nil;
   Authenticator:=Nil;
   FreeAndNil(FAdminUserIDs);
   FreeAndNil(FAdminUserIDs);
   FreeAndNil(FCustomViewResource);
   FreeAndNil(FCustomViewResource);