Revert "* org.el (org-fast-tag-selection): Fix bug when assigning keys"

This reverts commit c7d1e0f997.
This commit is contained in:
Carsten Dominik 2011-01-26 11:08:40 +01:00
parent 576c7bd520
commit e10eaa2502
1 changed files with 1 additions and 2 deletions

View File

@ -12945,8 +12945,7 @@ possibly with grouping information. TODO-TABLE is a similar table with
TODO keywords, should these have keys assigned to them.
If the keys are nil, a-z are automatically assigned.
Returns the new tags string, or nil to not change the current settings."
(let* ((table (sort table (lambda (a b) (string< (car a) (car b)))))
(fulltable (append table todo-table))
(let* ((fulltable (append table todo-table))
(maxlen (apply 'max (mapcar
(lambda (x)
(if (stringp (car x)) (string-width (car x)) 0))