[tree] Honour ObjectAutoRegistrationEnabled() in TEntryList.

TEntryList and its derived classes will from here on only register
themselves to gDirectory when the thread-local auto-registration is
enabled.

Author: hageboeck

core/base/src/TROOT.cxx

@@ -727,7 +727,7 @@ namespace Internal {
    /// | RooPlot               | Yes                                        | RooPlot::addDirectoryStatus()      |
    /// | TEfficiency           | Yes                                        | No                                 |
    /// | TProfile2D            | Yes                                        | TH1::AddDirectoryStatus()          |
-   /// | TEntryList            | No, but planned for 6.42                   | No                                 |
+   /// | TEntryList (+ derived)| Yes                                        | No                                 |
    /// | TEventList            | Yes                                        | No                                 |
    /// | TFunction             | No, but work in progress                   | No                                 |
    ///

tree/tree/src/TEntryList.cxx

@@ -160,7 +160,7 @@ End_Macro
 #include "TRegexp.h"
 #include "TSystem.h"
 #include "TObjString.h"
-
+#include "TROOT.h"
 
 ////////////////////////////////////////////////////////////////////////////////
 /// default c-tor
@@ -172,10 +172,11 @@ TEntryList::TEntryList() = default;
 
 TEntryList::TEntryList(const char *name, const char *title) : TNamed(name, title)
 {
-
-   fDirectory  = gDirectory;
-   if (fDirectory)
-      fDirectory->Append(this);
+   if (ROOT::Experimental::ObjectAutoRegistrationEnabled()) {
+      fDirectory = gDirectory;
+      if (fDirectory)
+         fDirectory->Append(this);
+   }
 }
 
 ////////////////////////////////////////////////////////////////////////////////
@@ -185,9 +186,11 @@ TEntryList::TEntryList(const char *name, const char *title, const TTree *tree) :
 {
    TEntryList::SetTree(tree);
 
-   fDirectory  = gDirectory;
-   if (fDirectory)
-      fDirectory->Append(this);
+   if (ROOT::Experimental::ObjectAutoRegistrationEnabled()) {
+      fDirectory = gDirectory;
+      if (fDirectory)
+         fDirectory->Append(this);
+   }
 }
 
 ////////////////////////////////////////////////////////////////////////////////
@@ -198,9 +201,11 @@ TEntryList::TEntryList(const char *name, const char *title, const char *treename
 {
    SetTree(treename, filename);
 
-   fDirectory  = gDirectory;
-   if (fDirectory)
-      fDirectory->Append(this);
+   if (ROOT::Experimental::ObjectAutoRegistrationEnabled()) {
+      fDirectory = gDirectory;
+      if (fDirectory)
+         fDirectory->Append(this);
+   }
 }
 
 ////////////////////////////////////////////////////////////////////////////////
@@ -210,9 +215,11 @@ TEntryList::TEntryList(const TTree *tree)
 {
    SetTree(tree);
 
-   fDirectory  = gDirectory;
-   if (fDirectory)
-      fDirectory->Append(this);
+   if (ROOT::Experimental::ObjectAutoRegistrationEnabled()) {
+      fDirectory = gDirectory;
+      if (fDirectory)
+         fDirectory->Append(this);
+   }
 }
 
 ////////////////////////////////////////////////////////////////////////////////