Index: trunk/MagicSoft/Mars/macros/collarea.C
===================================================================
--- trunk/MagicSoft/Mars/macros/collarea.C	(revision 1650)
+++ trunk/MagicSoft/Mars/macros/collarea.C	(revision 1653)
@@ -70,10 +70,13 @@
     // Write histogram to a file in case an output filename has been supplied:
 
-    TFile* f = new TFile(outname,"recreate");
-    if (f)
+    if (strlen(outname) > 0)
       {
-	TH1D* hc = ((MHMcCollectionArea*)parlist.FindObject("MHMcCollectionArea"))->GetHist();
-	hc->Write();
-	f.Close();
+	TFile* f = new TFile(outname,"recreate");
+	if (f)
+	  {
+	    TH1D* hc = ((MHMcCollectionArea*)parlist.FindObject("MHMcCollectionArea"))->GetHist();
+	    hc->Write();
+	    f.Close();
+	  }
       }
 }