Change the font of current buffer in Emacs?

Question

In emacs, I can change the font-size of current buffer by text-scale-adjust. However, to change the font, I only find functions like set-face-font or set-frame-font, which will change the font globally in emacs (or change all buffers' font within current frame).

Is there a function in emacs that only changes the font (default font) of current buffer, while not modifying the fonts in any other buffers?

Answer 1

I found a way, though it has some side effects as it changes the global variable buffer-face-mode-face

For example, I want to set current buffer, I can eval this function definition and run it

 (defun my-buffer-face-mode-serif ()
   "Sets a fixed width (monospace) font in current buffer"
   (interactive)
   (setq buffer-face-mode-face '(:family "Times New Roman"))
   (buffer-face-mode))