Re: table.el downcase HTML tags

[Ted Zlatanov <tzz@lifelogs.com>]

On 30 May 2006, lennart.borgman.073@student.lu.se wrote:

> I do not know of any case where uppercase tags is useful. Are there
> really any such cases?

Old, badly written parsers may look for "TABLE" and break with
"table".  Generally, why break old behavior if it can be left in as an
option?

For table.el, why not define something like this:

(defcustom table-uppercase-html-tags nil
  "*All generated HTML tags are in uppercase when this is set."
  :tag "Uppercase HTML tags"
  :type 'boolean
  :group 'table)

(defun table--generate-source-html-tag (tag-symbol text &optional options)
  (let ((tag-symbol (if table-uppercase-html-tags
		       (upcase tag-symbol)
		     tag-symbol)))
    (format "<%s %s> %s </%s>" tag-symbol options text tag-symbol)))

This would also simplify a lot of the table.el code that generates HTML :)

Ted