Bug in streamer inhibition of fStack corrected. (J. Chudoba)

[u/mrichter/AliRoot.git] / STEER / AliDetector.cxx

diff --git a/STEER/AliDetector.cxx b/STEER/AliDetector.cxx
index 11d097e560741427e7edb31a945ccb275e4eee4b..a7661972bff745371c1a6d815b4686079d081b41 100644 (file)
--- a/STEER/AliDetector.cxx
+++ b/STEER/AliDetector.cxx
@@ -15,6 +15,9 @@
 
 /*
 $Log$
+Revision 1.13  2001/05/16 14:57:22  alibrary
+New files for folders and Stack
+
 Revision 1.12  2001/03/12 17:47:03  hristov
 Changes needed on Sun with CC 5.0
 
@@ -149,23 +152,25 @@ void AliDetector::Publish(const char *dir, void *address, const char *name)
   // Register pointer to detector objects. 
   // 
   TFolder *topFolder = (TFolder *)gROOT->FindObjectAny("/Folders");
-  TFolder *folder = (TFolder *)topFolder->FindObjectAny(dir);
-  // TFolder *folder = (TFolder *)gROOT->FindObjectAny(dir);
-  if (!folder)  {
-    cerr << "Cannot register: Missing folder: " << dir << endl;
-  } else {
-    TFolder *subfolder = (TFolder *) folder->FindObjectAny(this->GetName()); 
-
-    if(!subfolder)
-       subfolder = folder->AddFolder(this->GetName(),this->GetTitle());
-    if (address) {
-      TObject **obj = (TObject **) address;
-      if ((*obj)->InheritsFrom(TCollection::Class())) {
-         TCollection *collection = (TCollection *) (*obj); 
-         if (name)
-           collection->SetName(name);
+  if  (topFolder) { 
+    TFolder *folder = (TFolder *)topFolder->FindObjectAny(dir);
+    // TFolder *folder = (TFolder *)gROOT->FindObjectAny(dir);
+    if (!folder)  {
+      cerr << "Cannot register: Missing folder: " << dir << endl;
+    } else {
+      TFolder *subfolder = (TFolder *) folder->FindObjectAny(this->GetName()); 
+
+      if(!subfolder)
+         subfolder = folder->AddFolder(this->GetName(),this->GetTitle());
+      if (address) {
+        TObject **obj = (TObject **) address;
+        if ((*obj)->InheritsFrom(TCollection::Class())) {
+           TCollection *collection = (TCollection *) (*obj); 
+           if (name)
+             collection->SetName(name);
+        } 
+        subfolder->Add(*obj);
       } 
-      subfolder->Add(*obj);
     }  
   }
 }