From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Raja R Harinath Newsgroups: gmane.emacs.devel Subject: Re: No malayalam glyphs in language/mlm-util.el Date: Sat, 15 Feb 2003 12:29:22 -0600 Organization: Dept. of Computer Science, Univ. of Minnesota Sender: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Message-ID: References: <200302132347.IAA10169@etlken.m17n.org> <200302141100.UAA11513@etlken.m17n.org> <87u1f5zg81.fsf@vsnl.net> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: main.gmane.org 1045333688 11403 80.91.224.249 (15 Feb 2003 18:28:08 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sat, 15 Feb 2003 18:28:08 +0000 (UTC) Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 18k72k-0002xk-00 for ; Sat, 15 Feb 2003 19:28:06 +0100 Original-Received: from monty-python.gnu.org ([199.232.76.173]) by quimby.gnus.org with esmtp (Exim 3.12 #1 (Debian)) id 18k7GH-0000tl-00 for ; Sat, 15 Feb 2003 19:42:06 +0100 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.10.13) id 18k74N-00037b-04 for emacs-devel@quimby.gnus.org; Sat, 15 Feb 2003 13:29:47 -0500 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.10.13) id 18k746-00031g-00 for emacs-devel@gnu.org; Sat, 15 Feb 2003 13:29:30 -0500 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.10.13) id 18k744-0002ye-00 for emacs-devel@gnu.org; Sat, 15 Feb 2003 13:29:29 -0500 Original-Received: from main.gmane.org ([80.91.224.249]) by monty-python.gnu.org with esmtp (Exim 4.10.13) id 18k744-0002wX-00 for emacs-devel@gnu.org; Sat, 15 Feb 2003 13:29:28 -0500 Original-Received: from list by main.gmane.org with local (Exim 3.35 #1 (Debian)) id 18k71m-0002uV-00 for ; Sat, 15 Feb 2003 19:27:06 +0100 X-Injected-Via-Gmane: http://gmane.org/ Original-To: emacs-devel@gnu.org Original-Received: from news by main.gmane.org with local (Exim 3.35 #1 (Debian)) id 18k71k-0002uF-00 for ; Sat, 15 Feb 2003 19:27:04 +0100 Original-Lines: 22 Original-X-Complaints-To: usenet@main.gmane.org User-Agent: Gnus/5.090016 (Oort Gnus v0.16) Emacs/21.3.50 Cancel-Lock: sha1:yWMhH2sgLPVnlUKbpWqkNnf6m1g= X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1b5 Precedence: list List-Id: Emacs development discussions. List-Help: List-Post: List-Subscribe: , List-Archive: List-Unsubscribe: , Errors-To: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Xref: main.gmane.org gmane.emacs.devel:11673 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:11673 Hi, Benjamin Riefenstahl writes: > (let ((fontset (query-fontset (frame-parameter nil 'font)))) > (when (not fontset) > (setq fontset "fontset-default") > (set-default-font fontset)) Or use the following (totally untested): (let* ((frame-font (frame-parameter nil 'font)) (current-fontset (query-fontset frame-font))) (unless current-fontset (setq current-fontset (create-fontset-from-ascii-font frame-font)) (set-default-font current-fontset)) ;; ... rest of code using current-fontset ) - Hari -- Raja R Harinath ------------------------------ harinath@cs.umn.edu