Hi,
I'm trying to get in the code of xtla-browse.el. There are a lot of
interesting things, but /please/, document the code. There are almost
no comment and docstrings, it's really hard for me to get into it.
I'm trying to implement a recursive node expansion. I've started
something in
[EMAIL PROTECTED]
Attempt to implement a recursive node expansion
It's mapped to `+', but it doesn't work.
Actually, what I don't understand is that with the following tree:
| [-] A [EMAIL PROTECTED] => http://www-verimag.imag.fr/webdav/moy/public
| | [+] c xtla-test
| | [+] c xtla
| | [+] c tlacontrib
| ` [+] c tla
If I put my cursor on the `M' of *M*atthieu.Moy,
(widget-get
(car (widget-get
(widget-get (tla--widget-node-get-at) :parent) :args)) :node)
Returns (tla--widget-category-node :archive ...), but the list I get
here is incomplete in comparison with the list I get if I just put my
cursor on the `x' of xtla-test, and try
(tla--widget-node-get-at)
Before my modification, I didn't have the :parent field. I now have
it, but `widget-default-value-set' searches for a :from field which is
also not present.
In brief, I don't understand, and I don't know how to continue.
Thanks for helping,
--
Matthieu
