Re: Portable dir-path separator?

[Michael Heerdegen <michael_heerdegen@web.de>]

Hi Thorsten,

> is it portable to split absolute file names in Emacs Lisp with "/" as
> separator? I searched for a related variable that abstracts away the
> slash vs. backslash issue, but did not find one (`path-separator' is ':'
> under GNU/Linux and probably not what I'm looking for).

I think you want something like

(defun split-path (path)
  (split-path-1 path ()))

(defun split-path-1 (path accum)
  (let ((dir  (directory-file-name (file-name-directory path)))
	(name (file-name-nondirectory path)))
    (if (equal dir path)
	accum
      (split-path-1 dir (cons name accum)))))

I totally agree that something like that could be built in.


Regards,

Michael.