Re: [External] : Re: How to setup default program to launch directory?

[Emanuel Berg]

Drew Adams wrote:

>> (require 'seq)
>> (defun dir-common-files (&optional dir)
>>   "Get a list of all files in the working directory."
>>   (let*((all-files (directory-files (or dir default-directory)))
>>         (files     (seq-difference all-files '("." ".."))) )
>>     files) )
>
> (directory-files (or  dir default-directory)
>                  nil
>                  "[^.]\\|\\.\\.\\.")

OK, thanks!

-- 
underground experts united
https://dataswamp.org/~incal