R devel - Apr 2018 - solve.default(): solve.qr() or qr.solve() in warning

If base::solve.default() is called with a 'qr' object, the following
will take place:

    if(inherits(a, "qr")) {
        warning("solve.default called with a \"qr\" object: use
'qr.solve'")
        return(solve.qr(a, b, tol))
    }

Note how the warning says that qr.solve() should be used, whereas
solve.qr() is called.

Should the warning just say:

    warning("solve.default called with a \"qr\" object: use
'solve.qr'")

or

    warning("solve.default called directly with a \"qr\" object:
use 'solve'")?

/Henrik