* `yas/describe-tables' wasn't working at all. nobody noticed probably means nobody's using it...

This commit is contained in:
capitaomorte 2010-05-07 22:05:52 +00:00
parent eb40f84432
commit e50ae363b4

View File

@ -2666,7 +2666,7 @@ With optional prefix argument KILL quit the window and buffer."
(aput 'groups-alist group (cons v (aget groups-alist group))))) (aput 'groups-alist group (cons v (aget groups-alist group)))))
(yas/table-uuidhash table)) (yas/table-uuidhash table))
(dolist (group-and-templates groups-alist) (dolist (group-and-templates groups-alist)
(when (rest groups-alist) (when (rest group-and-templates)
(setq group (truncate-string-to-width (car group-and-templates) 25 0 ? "...")) (setq group (truncate-string-to-width (car group-and-templates) 25 0 ? "..."))
(insert (make-string 100 ?-) "\n") (insert (make-string 100 ?-) "\n")
(dolist (p (cdr group-and-templates)) (dolist (p (cdr group-and-templates))