After mergin your tree, I found following code in xtla.
(defun tla-browse-category-widget-new (archive category &optional open-p
in-revlib)
(let ((widget (tla-browse-element-widget-new
'category "c" archive category)))
(widget-put widget :in-revlib in-revlib)
(widget-put widget :open open-p)
widget))
Is this indentation what you want?
Should we use this indentation style?
It is difficult for me to read list source code with this indentation.
I'm doing something wrong?
What I expect is, of couser:
(defun tla-browse-category-widget-new (archive category &optional open-p
in-revlib)
(let ((widget (tla-browse-element-widget-new
'category "c" archive category)))
(widget-put widget :in-revlib in-revlib)
(widget-put widget :open open-p)
widget))