From: dscott <dscott@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>
Date: Sun, 17 Aug 2014 10:27:44 +0000 (+0000)
Subject: Converted html tags to lower case (part of feature request #5879)
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;ds=sidebyside;h=65bfa08cf51c97c0e76cefc00092cc0ab4d25b83;p=xtable.git

Converted html tags to lower case (part of feature request #5879)

git-svn-id: svn://scm.r-forge.r-project.org/svnroot/xtable@45 edb9625f-4e0d-4859-8d74-9fd3b1da38cb
---

diff --git a/pkg/DESCRIPTION b/pkg/DESCRIPTION
index 88f6e23..d2884be 100644
--- a/pkg/DESCRIPTION
+++ b/pkg/DESCRIPTION
@@ -1,9 +1,9 @@
 Package: xtable
-Version: 1.7-3
-Date: 2014/01/08
+Version: 1.7-4
+Date: 2014/08/17
 Title: Export tables to LaTeX or HTML
 Author: David B. Dahl <dahl@stat.tamu.edu>
-Maintainer: Charles Roosen <statsci@gmail.com>
+Maintainer: David Scott <d.scott@auckland.ac.nz>
 Description: Coerce data to LaTeX and HTML tables
 URL: http://xtable.r-forge.r-project.org/
 Depends: R (>= 2.10.0)
diff --git a/pkg/NEWS b/pkg/NEWS
index c89cf1c..ec4aebe 100644
--- a/pkg/NEWS
+++ b/pkg/NEWS
@@ -1,8 +1,12 @@
-1.7-3 (2014-01-08)
+
+1.7-4 (NOT YET RELEASED)
+  * Changed tags in HTML to be all lower case, to be compatible with
+    HTML5, part of feature request(#5879)
   * Fixed booktabs bug (#2309), more of an enhancement really. Updated
     xtableGallery.snw to illustrate the change.
   * Moved vignettes from inst/doc to vignettes as now required by CRAN
 
+
 1.7-2 (2013-08-28, Not Released to CRAN)
   * Fixed HTML gsub bug (#2795)
   * Dealt with format.args bug (#4770). No code changes, but the
diff --git a/pkg/R/print.xtable.R b/pkg/R/print.xtable.R
index 34b0a7c..8aec031 100644
--- a/pkg/R/print.xtable.R
+++ b/pkg/R/print.xtable.R
@@ -4,7 +4,7 @@
 ###
 ### Copyright 2000-2013 David B. Dahl <dahl@stat.tamu.edu>
 ###
-### Maintained by Charles Roosen <croosen@mango-solutions.com>
+### Maintained by David Scott <d.scott@auckland.ac.nz>
 ###
 ### This file is part of the `xtable' library for R and related languages.
 ### It is made available under the terms of the GNU General Public
@@ -403,25 +403,25 @@ print.xtable <- function(x,
     } else {
         BCOMMENT <- "<!-- "
         ECOMMENT <- " -->\n"
-        BTABLE <- paste("<TABLE ", html.table.attributes, ">\n", sep = "")
-        ETABLE <- "</TABLE>\n"
+        BTABLE <- paste("<table ", html.table.attributes, ">\n", sep = "")
+        ETABLE <- "</table>\n"
         BENVIRONMENT <- ""
         EENVIRONMENT <- ""
         BTABULAR <- ""
         ETABULAR <- ""
         BSIZE <- ""
         ESIZE <- ""
-        BLABEL <- "<A NAME="
-        ELABEL <- "></A>\n"
-        BCAPTION <- paste("<CAPTION ALIGN=\"", caption.placement, "\"> ",
+        BLABEL <- "<a name="
+        ELABEL <- "></a>\n"
+        BCAPTION <- paste("<caption align=\"", caption.placement, "\"> ",
                           sep = "")
-        ECAPTION <- " </CAPTION>\n"
-        BROW <- "<TR>"
-        EROW <- " </TR>\n"
-        BTH <- " <TH> "
-        ETH <- " </TH> "
-        STH <- " </TH> <TH> "
-        BTD1 <- " <TD align=\""
+        ECAPTION <- " </caption>\n"
+        BROW <- "<tr>"
+        EROW <- " </tr>\n"
+        BTH <- " <th> "
+        ETH <- " </th> "
+        STH <- " </th> <th> "
+        BTD1 <- " <td align=\""
         align.tmp <- attr(x, "align", exact = TRUE)
         align.tmp <- align.tmp[align.tmp!="|"]
         BTD2 <- matrix(align.tmp[(2-pos):(ncol(x)+1)],
@@ -433,7 +433,7 @@ print.xtable <- function(x,
         BTD2[BTD2 == "l"] <- "left"
         BTD2[BTD2 == "c"] <- "center"
         BTD3 <- "\"> "
-        ETD  <- " </TD>"
+        ETD  <- " </td>"
         sanitize <- function(str) {
             result <- str
             ## Changed as suggested in bug report #2795