From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Patrick Drechsler Newsgroups: gmane.emacs.devel Subject: translating customize font selection Date: Wed, 06 Aug 2008 23:36:22 +0200 Organization: none Message-ID: <87hc9xg71l.fsf@pdrechsler.de> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: ger.gmane.org 1218058622 20961 80.91.229.12 (6 Aug 2008 21:37:02 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Wed, 6 Aug 2008 21:37:02 +0000 (UTC) To: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Aug 06 23:37:53 2008 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1KQqhZ-0005nd-Ro for ged-emacs-devel@m.gmane.org; Wed, 06 Aug 2008 23:37:50 +0200 Original-Received: from localhost ([127.0.0.1]:51184 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KQqga-0006pD-MC for ged-emacs-devel@m.gmane.org; Wed, 06 Aug 2008 17:36:48 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1KQqgV-0006l4-3F for emacs-devel@gnu.org; Wed, 06 Aug 2008 17:36:43 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1KQqgS-0006gD-Vo for emacs-devel@gnu.org; Wed, 06 Aug 2008 17:36:42 -0400 Original-Received: from [199.232.76.173] (port=49203 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KQqgS-0006fd-Lc for emacs-devel@gnu.org; Wed, 06 Aug 2008 17:36:40 -0400 Original-Received: from main.gmane.org ([80.91.229.2]:53467 helo=ciao.gmane.org) by monty-python.gnu.org with esmtps (TLS-1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1KQqgS-0007GE-9N for emacs-devel@gnu.org; Wed, 06 Aug 2008 17:36:40 -0400 Original-Received: from list by ciao.gmane.org with local (Exim 4.43) id 1KQqgH-0002ue-D6 for emacs-devel@gnu.org; Wed, 06 Aug 2008 21:36:29 +0000 Original-Received: from dslb-084-057-091-087.pools.arcor-ip.net ([84.57.91.87]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 06 Aug 2008 21:36:29 +0000 Original-Received: from patrick by dslb-084-057-091-087.pools.arcor-ip.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 06 Aug 2008 21:36:29 +0000 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 30 Original-X-Complaints-To: usenet@ger.gmane.org X-Gmane-NNTP-Posting-Host: dslb-084-057-091-087.pools.arcor-ip.net Face: iVBORw0KGgoAAAANSUhEUgAAADAAAAAwBAMAAAClLOS0AAAAFVBMVEUAAACtra19fX3y8vKA gID///9AQEBawxxrAAABeUlEQVR4nHXSwXKDIBAA0G3a8Vw05JxY9E4MObeK3h1Cz2qt//8J3UWj ppIdBxmfu4sC2CcB070+PQHDuAcyhQPzwLVFuSlfqQK7eOFirfQ2ly7JC8a3Kip1sx6QLOaRB0wo IUg8gFUa2D2BIFVb+OYGhC23cB4aUDbaQt4AgifjCACt9HwgQfrjWZWDwNPjEwHbtBu44kPC5D9Y FknMgFf8aZFawDDGIuoTkAYndYczzd5hjqAYwXzQ/QCraB2401HvHyQhKMb2tbw0M7whuBNoIs4M W/Xh056fQzwLPF/g14FkrcLN4nKp9WLByIMImSwyycLjDDsOF93pVFdC6yofHkEjxDhWumtWsMdH edc7SOf2/QiYQiByUU0gSldKD4LyBLUbK+kCaoI+diNlxgOGmIFWhVDpe5RgqEiPRR6Buwx8PxXE G3CGzeMVmAnctUB5h3Hsthljp34Ne/wjbu4+cIovBVbqfH4vFdOkoI2SzEWUZdMMQ9k/5csXnnRd prMAAAAASUVORK5CYII= User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.0.60 (gnu/linux) Cancel-Lock: sha1:uBk419CrKqqySTwcvgrpd5vnyNo= X-detected-kernel: by monty-python.gnu.org: Linux 2.6, seldom 2.4 (older, 4) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:102134 Archived-At: Hi, currently I have this in my ~/.emacs.d/init.el file: --8<---------------cut here---------------start------------->8--- (custom-set-faces ;; custom-set-faces was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. '(default ((t (:inherit nil :stipple nil :background "#ffffff" :foreground "#000000" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 98 :width normal :foundry "unknown" :family "DejaVu Sans Mono"))))) --8<---------------cut here---------------end--------------->8--- I would like to translate this to an expression so I can wrap it in something like (if (eq system-type 'gnu/linux) ;; or some other condition ;; ) TIA, Patrick Emacs version: In GNU Emacs 23.0.60.1 (i686-pc-linux-gnu, GTK+ Version 2.12.9) of 2008-08-06 on golem Windowing system distributor `The X.Org Foundation', version 11.0.10400090 configured using `configure '--with-x-toolkit=gtk' '--prefix=/home/patrick/prg/stow/emacs-devel''