GNU bug report logs - #78990
30.1; Show-font breaks `insert-file-contents-literally'

Previous Next

Full log

Message #14 received at submit <at> debbugs.gnu.org (full text, mbox):

From: Protesilaos Stavrou <prot <at> protesilaos.com>
To: Zhengyi Fu <i <at> fuzy.me>
Cc: bug-gnu-emacs <at> gnu.org, info <at> protesilaos.com
Subject: Re: 30.1; Show-font breaks `insert-file-contents-literally'
Date: Thu, 10 Jul 2025 20:03:32 +0300

On 2025-07-10 15:27, Zhengyi Fu wrote:
> Thank you for your fast reply.

You are welcome!

> No.  Actually, I don't know how to fix it correctly.

Okay, no worries! Let's try to do this together. I have not tried 
'insert-file-contents-literally' before. Please evaluate the following 
function and try again.

(defun show-font--insert-button ()
  "Insert `show-font-installed-file-button' at point."
  (when buffer-file-name
    (insert
     (propertize "Cannot preview this font" 'face 'show-font-title)
     "\n\n"
     (propertize buffer-file-name 'face 'bold)
     " is not installed"
     "\n\n"
     "Install this font file?"
     "\n")
    (goto-char (point-max))
    (make-text-button (line-beginning-position 0) (line-end-position 0) 
:type 'show-font-installed-file-button)))

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.