Path: csiph.com!weretis.net!feeder9.news.weretis.net!border-4.nntp.ord.giganews.com!nntp.giganews.com!Xl.tags.giganews.com!local-2.nntp.ord.giganews.com!news.giganews.com.POSTED!not-for-mail
NNTP-Posting-Date: Mon, 30 Mar 2026 00:17:11 +0000
From: steve g <sgonedes1977@gmail.com>
Newsgroups: gnu.emacs.help
Subject: Re: help with fonts
References: <101a44s$3vdfk$1@dont-email.me>
Date: Sun, 29 Mar 2026 20:17:06 -0400
Message-ID: <87341itblp.fsf@gmail.com>
User-Agent: Gnus/5.13 (Gnus v5.13)
Cancel-Lock: sha1:BcitBKDxwQyKrtf/WOnH+qWVD+Y=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 8bit
Lines: 45
X-Usenet-Provider: http://www.giganews.com
X-Trace: sv3-BELsz5SHIwE5e2+a0B1AkLAc1xws64iyLGiU/2OX2eSuXL1Yfkgoh6MO4ZgBUn2qe+zE3yiP8kmLey1!P73UnnDlCXb0T/K658mbLXCNNbx+bDFpd/VJLTZk0fpgcGI=
X-Complaints-To: abuse@giganews.com
X-DMCA-Notifications: http://www.giganews.com/info/dmca.html
X-Abuse-and-DMCA-Info: Please be sure to forward a copy of ALL headers
X-Abuse-and-DMCA-Info: Otherwise we will be unable to process your complaint properly
X-Postfilter: 1.3.40
Xref: csiph.com gnu.emacs.help:61050

François Patte <francois.patte@mi.parisdescartes.fr> writes:

> Bonjour,
>
> I have this line in my init file .emacs :
>
> (set-face-font 'default "fontset-default")
>    (set-fontset-font "fontset-default" 'grantha "Noto Serif Grantha")
>
> And emacs complains that it cannot find this font.



try M-x list-colors-display

I found the following in my dot-emacs file.


;; Fonts for win32

;; (setq w32-enable-synthesized-fonts t)
;; (set-face-font 'italic "-*-Courier New-normal-i-*-*-11-*-*-*-c-*-iso8859-1")
;; (set-face-font 'bold-italic "-*-Courier New-bold-i-*-*-11-*-*-*-c-*-iso8859-1")

;;(set-face-font 'default "-outline-Andale Mono-normal-normal-normal-mono-*-*-*-*-c-*-iso8859-1")

;; Display Windows Fonts
(defun si:win32-dump-fonts (&optional pattern)
  "Insert available font names into current buffer.
When <pattern> is supplied only insert fonts that match <pattern>."
  (interactive)
  (let ((fonts (sort (x-list-fonts (or pattern "*")) 'string< ))
        num)
    (setq num (length fonts))
    (save-excursion
      (while fonts
        (newline )
        (insert (car fonts))
        (setq fonts (cdr fonts)))
      (newline))
    (message "Inserted %d fonts." num)))



hope this helps