compile.el, using grep-find when find-program is not "find"

[Marcus Picasso]

In GNU Emacs 21.3.1 (i386-msvc-nt5.0.2195) of 2003-03-28 on buffy:

Changing the lisp variable "find-program" to something else than "find"
makes compile.el position the point at wrong place, when doing "M-x
grep-find".

Hint:

Compile.el has in "grep-compute-defaults" a line which I think takes care of
point-positioning, and it handles different lenghts of grep-command right,
but not find-command. The line is:

    (+ 22 (length grep-command))))))))

Best regards,
-Marcus.