Index: trunk/MagicSoft/Mars/macros/collarea.C
===================================================================
--- trunk/MagicSoft/Mars/macros/collarea.C	(revision 1653)
+++ trunk/MagicSoft/Mars/macros/collarea.C	(revision 1660)
@@ -24,5 +24,5 @@
 
 
-void collarea(char *filename = "data/camera.root", char *outname = "")
+void collarea(TString filename="camera.root", TString outname="")
 { 
     //
@@ -68,15 +68,15 @@
 
 
-    // Write histogram to a file in case an output filename has been supplied:
+    //
+    // Write histogram to a file in case an output
+    // filename has been supplied
+    //
+    if (outname.IsNull())
+        return;
 
-    if (strlen(outname) > 0)
-      {
-	TFile* f = new TFile(outname,"recreate");
-	if (f)
-	  {
-	    TH1D* hc = ((MHMcCollectionArea*)parlist.FindObject("MHMcCollectionArea"))->GetHist();
-	    hc->Write();
-	    f.Close();
-	  }
-      }
+    TFile f(outname, "recreate");
+    if (!f)
+        return;
+
+    parlist.FindObject("MHMcCollectionArea")->Write();
 }