[rkward-cvs] SF.net SVN: rkward: [1072] trunk/rkward/rkward/rbackend/rpackages/rkward/R/ public.R

[tfry at users.sourceforge.net]

Revision: 1072
          http://svn.sourceforge.net/rkward/?rev=1072&view=rev
Author:   tfry
Date:     2007-01-07 07:30:12 -0800 (Sun, 07 Jan 2007)

Log Message:
-----------
Fix minor bug in rk.header

Modified Paths:
--------------
    trunk/rkward/rkward/rbackend/rpackages/rkward/R/public.R

Modified: trunk/rkward/rkward/rbackend/rpackages/rkward/R/public.R
===================================================================
--- trunk/rkward/rkward/rbackend/rpackages/rkward/R/public.R	2007-01-07 15:29:51 UTC (rev 1071)
+++ trunk/rkward/rkward/rbackend/rpackages/rkward/R/public.R	2007-01-07 15:30:12 UTC (rev 1072)
@@ -133,7 +133,7 @@
 }
 
 "rk.header" <- function (title, parameters=list ()) {
-	cat (paste ("<h1>", title, "<h1>\n", sep=""))
+	cat (paste ("<h1>", title, "</h1>\n", sep=""))
 	if (length (parameters)) {
 		cat ("<h2>Parameters</h2>\n<ul>")
 		len <- length (parameters)


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.