Hi Jon,
I would like collect file extensions into an idx tree X, and for
each file F I think this expression should do the work:
(let L (chop F) (when (index '. L) (idx 'X (pack (stem L '.)) T)))
Now I want to make this into a function with the name 'collectExt'
and arguments for X and
Hi Alex,
Thanks a lot! That works very fine.
And by the way, I receive mail from the list without problems now. It
seems it was something with the mail system here at UiO; I had moved my
PicoLisp inbox from local to server, but I hadn't updated my filter
accordingly. ;-)
/Jon
On 18-10-13
Hi Jon,
Thanks a lot! That works very fine.
Great :)
And by the way, I receive mail from the list without problems now.
It seems it was something with the mail system here at UiO; I had
moved my PicoLisp inbox from local to server, but I hadn't updated
my filter accordingly. ;-)
Good to