Re: /srv/bzr/emacs/trunk r100059: (bug-reference-url-format): Mark as `safe-local-variable' if the value

[Chong Yidong]

"Davis Herring" <address@hidden> writes:

>> (put 'bug-reference-url-format 'safe-local-variable
>>   (let ((f (get 'bug-reference-url-format 'safe-local-variable)))
>>    (lambda (s) (or (funcall f s) (eq s
>> 'clisp-bug-reference-url-format)))))
>
> That won't work if the existing value is not a function (e.g. if it is t
> (which would be foolish, of course) or nil).

A `safe-local-variable' property must be a function of one argument
(or nil).