[Distr-commits] r208 - branches/distr-2.0/pkg/distrMod/R

[noreply at r-forge.r-project.org]

Author: stamats
Date: 2008-07-28 13:56:17 +0200 (Mon, 28 Jul 2008)
New Revision: 208

Modified:
   branches/distr-2.0/pkg/distrMod/R/AllShow.R
Log:
minor change to show method for class Estimate

Modified: branches/distr-2.0/pkg/distrMod/R/AllShow.R
===================================================================
--- branches/distr-2.0/pkg/distrMod/R/AllShow.R	2008-07-28 10:42:20 UTC (rev 207)
+++ branches/distr-2.0/pkg/distrMod/R/AllShow.R	2008-07-28 11:56:17 UTC (rev 208)
@@ -96,6 +96,8 @@
         cat(paste("An object of class", dQuote(class(object)), "\n"))
         cat("estimate:\n")
         print(object at estimate)
-        if(nrow(object at Infos) > 0)
-          cat("Infos:\t", object at Infos, "\n")
+        if(nrow(object at Infos) > 0){
+          cat("Infos:\n")
+          print(object at Infos)
+        }
     })