From 3fb93ad0bfad8b449df78830470c8d2c9f38fcc8 Mon Sep 17 00:00:00 2001 From: ondrej Date: Sun, 3 Jan 2016 12:00:12 +0000 Subject: [PATCH] packagetabs: prevent AV git-svn-id: trunk@51143 - --- components/packagetabs/packagetabs_impl.pas | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/components/packagetabs/packagetabs_impl.pas b/components/packagetabs/packagetabs_impl.pas index f6495f20d5..f754376e9d 100644 --- a/components/packagetabs/packagetabs_impl.pas +++ b/components/packagetabs/packagetabs_impl.pas @@ -385,7 +385,10 @@ begin if not Result then Exit; - FCurProjectChangeStamp := LazarusIDE.ActiveProject.ChangeStamp; + if LazarusIDE.ActiveProject <> nil then + FCurProjectChangeStamp := LazarusIDE.ActiveProject.ChangeStamp + else + FCurProjectChangeStamp := Low(FCurProjectChangeStamp); FPackagesChangeStamp := PackageGraphInterface.ChangeStamp; FLastInternalChangeStamp := FInternalChangeStamp; end;