list problems

I've used (vl-directory-files "C:FOLDER/" "*.xyz" 1) to get a list of the
files in "FOLDER" directory and my list returns something like: [0] 123.xyz
[1] abc.xyz [2] mno.xyz......etc. Now, I need to strip away the extension
".xyz" from each of these file names, but remain in a list form. I know
that (vl-string-right-trim ".xyz" <something>) will get rid of the
extension, but I'm not sure how to go about using it. Any suggestion? TIA

 

(defun test()
(mapcar
(function(lambda (item)
(substr item 1(-(strlen item)4))
);l
);f
(list
"test.dwg"
"this.txt"
"out.xls"
)
)
)

 

Maybe (mapcar 'vl-filename-base list_of_items)

 

Okay, when I added this to my routine
<DirList is the list returned from vl-directory-list>

(mapcar
(function (lambda (DirList)
(substr DirList 1(-(strlen DirList)4))
);l
);f
(list
".xyz"
)
)

It returned: ""
--
Rabbit @ home, down in the hole

 

Maybe (mapcar 'vl-filename-base list_of_items)

That's it! Thanks John and MP

 

You didn't apply it properly. Instead of altering the function, you should
have simply substituted your list:

(mapcar
(function(lambda (item)
(substr item 1(-(strlen item)4))))
DirList)