[rkward-cvs] rkward/rkward/rbackend/rpackages/rkward/R public.R,1.9,1.10

[Pierre]

Update of /cvsroot/rkward/rkward/rkward/rbackend/rpackages/rkward/R
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv5482/rkward/rbackend/rpackages/rkward/R

Modified Files:
	public.R 
Log Message:
Passing arguments to HTML() in rk.print().

Index: public.R
===================================================================
RCS file: /cvsroot/rkward/rkward/rkward/rbackend/rpackages/rkward/R/public.R,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** public.R	4 Apr 2005 20:08:26 -0000	1.9
--- public.R	22 Apr 2005 06:17:15 -0000	1.10
***************
*** 73,79 ****
  }
  
! "rk.print" <- function(x) {
  	if(require("R2HTML")==TRUE) {
! 		HTML(x)
  	}
  }
--- 73,79 ----
  }
  
! "rk.print" <- function(x,...) {
  	if(require("R2HTML")==TRUE) {
! 		HTML(x,...)
  	}
  }