From mboxrd@z Thu Jan  1 00:00:00 1970
From: Joost Kremers <joostkremers@fastmail.fm>
Subject: Re: Make wide tables more readable
Date: Thu, 01 Dec 2016 21:43:01 +0100
Message-ID: <87polbqt2i.fsf@fastmail.fm>
References: <CAM6q_N4WSQ5dxO_QUfHMdUcsgRS546-TMSDMLnmkPBQ_pvjAdA@mail.gmail.com>
	<CAJ51EToCRP=qCHWKuQ4dQYDY2D9yP876S474aipKutLr-mczug@mail.gmail.com>
Mime-Version: 1.0
Content-Type: text/plain; format=flowed
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:51040)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <joostkremers@fastmail.fm>) id 1cCYCG-0007nD-69
	for emacs-orgmode@gnu.org; Thu, 01 Dec 2016 15:43:13 -0500
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <joostkremers@fastmail.fm>) id 1cCYCD-0000qf-Ji
	for emacs-orgmode@gnu.org; Thu, 01 Dec 2016 15:43:12 -0500
Received: from out5-smtp.messagingengine.com ([66.111.4.29]:51792)
	by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32)
	(Exim 4.71) (envelope-from <joostkremers@fastmail.fm>)
	id 1cCYCD-0000oW-BT
	for emacs-orgmode@gnu.org; Thu, 01 Dec 2016 15:43:09 -0500
In-reply-to: <CAJ51EToCRP=qCHWKuQ4dQYDY2D9yP876S474aipKutLr-mczug@mail.gmail.com>
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"
	<emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
To: John Kitchin <jkitchin@andrew.cmu.edu>
Cc: David Talmage <david.talmage@shoutpoint.com>, "emacs-orgmode@gnu.org" <emacs-orgmode@gnu.org>


On Thu, Dec 01 2016, John Kitchin wrote:
> I use:
>
> ;;;###autoload
> (defun tq-increase-text-size ()
>   "Increase text size."
>   (interactive)
>   (set-face-attribute 'default nil :height
>      (truncate (* 1.1 (face-attribute 'default :height)))))
>
> ;;;###autoload
> (defun tq-decrease-text-size ()
>   "Decrease text size."
>   (interactive)
>   (set-face-attribute 'default nil :height
>      (truncate (* 0.9 (face-attribute 'default :height)))))
>
> which I bind to C-- and  C-= to shrink the font size down until 
> it fits,
> then when I am done increase it.

Why not use `text-scale-adjust`? This function has convenient 
bindings in the form `C-x C-+` to increase text size, `C-x C--` to 
decrease, and `C-x C-0` to reset to default size. Furthermore, 
once you press any of these, you can simply use `+`, `-` and `0` 
for increasing, decreasing and resetting until you've found your 
preferred text size.

-- 
Joost Kremers
Life has its moments