Re: quoted buffer object

[Johan Bockgård]

Thien-Thi Nguyen <address@hidden> writes:

> in vc.el:999, i see:
>
>   (with-current-buffer ',(current-buffer)
>
> weird.  here are some experiments in *scratch*:
>
>   (bufferp (current-buffer))
>   t
>   
>   (bufferp (car `(,(current-buffer))))
>   t
>   
>   (bufferp (car `(',(current-buffer))))
>   nil
>
> i conclude the code as it stands does not DTRT.

But 'x *evaluates* to x, so the quote is harmless (though superfluous,
since buffer objects are self-evaluating).

  `(lambda ()
     (with-current-buffer ',(current-buffer) ...))

     =>  (lambda nil (with-current-buffer '#<buffer foo> ...))

which will DTRT.

-- 
Johan Bockgård