Load behaviour on Maxima 5.18.0 and above using ecl

Matthew Gwynne wrote:
> On Wed, May 20, 2009 at 2:43 PM, Raymond Toy <raymond.toy at stericsson.com> wrote:
>   
>> That wasn't particularly helpful because we already knew it was wrong.
>> But I wasn't very clear either, so I take full blame for that. :-)
>>
>>     
>
> Ah apologies, I should have thought more about what I was doing.
>
>   
>> Can you try the following replacement?  (Stick it in some new file, and
>> load it into maxima and run it.)  I don't need everything that is
>> printed out, just the first few lines to see if enough-namestring is
>> doing what we want.
>>     
>
> (%i2) :lisp (share-subdirs-list)
> share-root = /home/aeternus/Work/OKlibrary/OKlibTestSym/maxima-5.18.1/install/share/maxima/5.18.1/share/
> x = /home/aeternus/Work/OKlibrary/OKlibTest/maxima-5.18.1/install/share/maxima/5.18.1/share/misc/
> dir = /home/aeternus/Work/OKlibrary/OKlibTest/maxima-5.18.1/install/share/maxima/5.18.1/share/misc
> enough = /home/aeternus/Work/OKlibrary/OKlibTest/maxima-5.18.1/install/share/maxima/5.18.1/share/misc
>   
Ok.  This is rather interesting.  Is OKlibTestSym (or OKlibTest) a symlink?

The share-root is "/home/aeternus/Work/OKlibrary/OKlibTestSym/...", but
directory returns paths like
"/home/aeternus/Work/OKlibrary/OKlibTest", so it's no wonder that
enough-namestring doesn't do what we want.

What does :lisp (truename (pathname (concatenate 'string
*maxima-sharedir* "/"))) return?

Ray