[slime-devel] Re: Better solution to redefinition warnings in Allegro

[Helmut Eller]

Peter Seibel <peter at javamonkey.com> writes:

>> What about if instead of (buffer-name) in slime.el we use (or
>> (buffer-file-name) (buffer-name))?
>
> Er, rather:
>
>   (if (buffer-file-name)
>     (file-name-nondirectory (buffer-file-name))
>     (buffer-name))

I don't think we should change that.  The buffer-name unambiguously
identifies the buffer.  That's a good thing.

> You mean because we always pass a directory argument, even if its only
> NIL and thus the will never happen? I guess I should just bind
> *default-pathname-defaults* to (if directory (merge-pathnames
> (pathname directory)) *default-pathname-defaults*) and take the
> default value of the directory parameter.

Yes, that should work.  You could also pass the buffer-file-name and
bind it, appropriately parsed, to *default-pathname-defaults*.

Helmut.