[debug] setlogger cannot be null

DelphiPraxis · Oct 22, 2020 · 010ce06 · 010ce06
1 parent 8f96b82
commit 010ce06
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/Quick.Debug.Utils.pas b/Quick.Debug.Utils.pas
@@ -198,6 +198,7 @@ class function TDebugger.Log: ILogger;
 
 class procedure TDebugger.SetLogger(aLogger: ILogger);
 begin
+  if aLogger = nil then raise Exception.Create('Debugger logger cannot be nil!');
   fLogger := aLogger;
   fShowTime := False;
 end;