Re: Converting filenames

["B. T. Raven" <nihil@nihilo.net>]

B. T. Raven wrote:
> Nordlöw wrote:
>> Is there an opposite function of expand-file-name() that converts "/
>> home/per/" to "~/" if I am user per?
>>
>> Thanks in advance,
>> Nordlöw
> 
> I don't think that a general inverse function would be useful since "~/"
> is probably not a symlink or hard link but just string somehow hard
> coded to expand to the fully qualified home path. What would the
> putative abbrev-file-name do with dir/subdir/pic.jpg? The only sensible
> thing is just to return its argument.
> 
> Something like this:
> 
> (if (equal (getenv "home") "/home/per")    (print "~/"))
> 
> illustrates what should happen if the Emacs process belongs to per.
> 
> Ed

Oops, abbreviate-file-name actually exists but returns only "~". You
could wrap it in something that concats the "/"

Ed