Dear developers,

There's a small bug in print.fitdistr that can cause output to be printed
twice, but only if print is called explicitly:

> fit<-fitdistr(rt(1000,3),"t")
There were 11 warnings (use warnings() to see them)
> fit
        m             s            df
  -0.02181723    1.00145296    3.13723878
 ( 0.03865057) ( 0.03999447) ( 0.33298377)
> print(fit)
        m             s            df
  -0.02181723    1.00145296    3.13723878
 ( 0.03865057) ( 0.03999447) ( 0.33298377)
        m             s            df
  -0.02181723    1.00145296    3.13723878
 ( 0.03865057) ( 0.03999447) ( 0.33298377)

Most likely, the function print.fitdistr doesn't return the input invisibly.

Cheers,
Enrico

	[[alternative HTML version deleted]]

