[Distr-commits] r331 - pkg/distrMod/R

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

Author: ruckdeschel
Date: 2008-11-12 22:27:15 +0100 (Wed, 12 Nov 2008)
New Revision: 331

Modified:
   pkg/distrMod/R/AllShow.R
Log:
yet another typo...


Modified: pkg/distrMod/R/AllShow.R
===================================================================
--- pkg/distrMod/R/AllShow.R	2008-11-12 21:18:32 UTC (rev 330)
+++ pkg/distrMod/R/AllShow.R	2008-11-12 21:27:15 UTC (rev 331)
@@ -232,7 +232,7 @@
 
 setMethod("show", "Confint", 
     function(object){
-        if (length(type(object)<2))
+        if (length(type(object))<2)
             cat(gettextf("A[n] %s confidence interval:\n",type(object)))
         else{
             cat(gettextf("A[n] %s confidence interval:\n",type(object)[1]))