From mboxrd@z Thu Jan  1 00:00:00 1970
From: Alan Schmitt <alan.schmitt@polytechnique.org>
Subject: Displaying links in tables in fixed-width font
Date: Wed, 18 Sep 2013 13:46:16 +0200
Message-ID: <m2ob7qjqt3.fsf@polytechnique.org>
Mime-Version: 1.0
Content-Type: text/plain
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:39307)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <alan.schmitt@polytechnique.org>) id 1VMGDB-0004kN-A9
	for emacs-orgmode@gnu.org; Wed, 18 Sep 2013 07:46:31 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <alan.schmitt@polytechnique.org>) id 1VMGD4-0002i6-C0
	for emacs-orgmode@gnu.org; Wed, 18 Sep 2013 07:46:25 -0400
Received: from mail3-relais-sop.national.inria.fr ([192.134.164.104]:63972)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <alan.schmitt@polytechnique.org>) id 1VMGD4-0002gb-5X
	for emacs-orgmode@gnu.org; Wed, 18 Sep 2013 07:46:18 -0400
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=subscribe>
Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
To: Emacs Org mode <emacs-orgmode@gnu.org>

Hello,

I'm using a proportional font for my text modes (including org-mode),
with a little hack to make sure that code and tables are displayed in a
fixed font.

--8<---------------cut here---------------start------------->8---
;; from http://yoo2080.wordpress.com/2013/05/30/monospace-font-in-tables-and-source-code-blocks-in-org-mode-proportional-font-in-other-parts/
(defun my-adjoin-to-list-or-symbol (element list-or-symbol)
  (let ((list (if (not (listp list-or-symbol))
                  (list list-or-symbol)
                list-or-symbol)))
    (require 'cl-lib)
    (cl-adjoin element list)))

(mapc
 (lambda (face)
   (set-face-attribute
    face nil
    :inherit
    (my-adjoin-to-list-or-symbol
     'fixed-pitch
     (face-attribute face :inherit))))
 (list 'org-code 'org-block 'org-table 'org-block-background 'org-date))
--8<---------------cut here---------------end--------------->8---

It works great with one exception: links in tables are displayed using a
proportional font, which breaks the alignment of columns. Is there a way
to display links in table in a fixed font (and keep them proportional in
other places)? Or is it only possible to always display them in a fixed
font?

Thanks,

Alan