bug#60454: 30.0.50; `format-message' does not allow displaying "`" and "'" verbatim

[Gregory Heytings]

> Would it be possible to introduce some kind of escape mechanism in 
> `format-message' to produce literal "'" and "`" when needed?

Just let-bind text-quoting-style:

(let ((text-quoting-style 'grave))
  (format-message "foo `bar' baz"))