Re: master 95717db1e8: Fix mouse pointer avoidance in some configurations

[Arash Esbati <arash@gnu.org>]

Po Lu via Mailing list for Emacs changes <emacs-diffs@gnu.org> writes:

> diff --git a/lisp/avoid.el b/lisp/avoid.el
> index b53d84d2e8..c97e51a6f7 100644
> --- a/lisp/avoid.el
> +++ b/lisp/avoid.el
> @@ -300,12 +300,14 @@ has an integer value is a valid cursor shape.  You might want to
>  redefine this function to suit your own tastes."
>    (if (null mouse-avoidance-pointer-shapes)
>        (progn
> -	(setq mouse-avoidance-pointer-shapes
> -	      (mapcar (lambda (x) (symbol-value (intern x)))
> -		      (all-completions "x-pointer-" obarray
> -				       (lambda (x)
> -					  (and (boundp x)
> -                                               (integerp (symbol-value x)))))))))
> +	(dolist (i (all-completions "x-pointer-" obarray
> +				    (lambda (x)
> +				      (and (boundp x)
> +                                           (integerp (symbol-value x))))))
> +          (ignore-errors
> +            (let ((value (symbol-value (intern i))))
> +              (when (< value x-pointer-invisible)
> +                (push value mouse-avoidance-pointer-shapes)))))))
>    (seq-random-elt mouse-avoidance-pointer-shapes))

I think this change leads to:

  In mouse-avoidance-random-shape:
  avoid.el:309:30: Warning: reference to free variable `x-pointer-invisible'

when building Emacs (aeefa3a732, on Win10).

Best, Arash