Re: [PATCH] Alignment problem with org-format-org-table-html

[Carsten Dominik <carsten.dominik@gmail.com>]

Hi Stephen, nice catch, thank you very much!

I have applied the patch.

- Carsten

On Apr 27, 2010, at 8:39 PM, Stephen Peters wrote:

> When creating a table, I was noticing that the
> <colgroup><col>... provides useful alignment information based on
> whether or not the column has numbers in it.  I think, however, that
> there is a mistake in this routine.  Take, for example, the following
> table:
>
> |  Id | Task         | Developer | Estimate | Spent | Remaining |  
> Comp.% | Updated         |
> |-----+--------------+-----------+----------+-------+----------- 
> +--------+-----------------|
> |   1 | Task One     | SLP       |        1 |     0 |         1  
> |      0 | SLP, 2010-04-27 |
> |   2 | Task Two     | SLP       |        1 |     0 |         1  
> |      0 | SLP, 2010-04-27 |
> |   3 | Task Three   | SLP       |        2 |     0 |         2  
> |      0 | SLP, 2010-04-27 |
> |   4 | Task Four    | SLP       |        2 |     0 |         2  
> |      0 | SLP, 2010-04-27 |
> |   5 | Task Five    | SLP       |      .25 |     0 |      0.25  
> |      0 | SLP, 2010-04-27 |
> | 5.1 | Another Task | XML team  |        0 |     1 |         0  
> |      0 | SLP, 2010-04-27 |
> |   6 | Task Six     | SLP       |      .25 |     0 |      0.25  
> |      0 | SLP, 2010-04-27 |
> | 6.1 | More Tasks   | DB team   |        3 |     0 |         3  
> |      0 | SLP, 2010-04-27 |
> |   7 | Task Seven   | SLP       |        3 |     0 |         3  
> |      0 | SLP, 2010-04-27 |
>
> When the colgroup list is created for this table, it reads:
>
> <colgroup><col align="right" /><col align="left" /><col  
> align="left" /><col align="right" /><col align="right" /><col  
> align="left" /><col align="left" /><col align="left" />
> </colgroup>
>
> Note that the first columns are correct, but the last few are not.
> It should read right, left, left, right, right, right, right, left.
>
> I believe that this is due to the (< i nline) comparison within org- 
> format-org-table-html, which is nonsensical because it's trying to  
> compare a column number with a number of rows.  I've attached a  
> patch for the problem.
>
>
>
> diff --git a/lisp/org-html.el b/lisp/org-html.el
> index 3ac2b18..0ffde15 100644
> --- a/lisp/org-html.el
> +++ b/lisp/org-html.el
> @@ -1659,8 +1659,7 @@ lang=\"%s\" xml:lang=\"%s\">
> 		      (mapconcat
> 		       (lambda (x)
> 			 (setq i (1+ i))
> -			 (if (and (< i nline)
> -				  (string-match org-table-number-regexp x))
> +			 (if (string-match org-table-number-regexp x)
> 			     (incf (aref fnum i)))
> 			 (cond
> 			  (head
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode

- Carsten