From mboxrd@z Thu Jan 1 00:00:00 1970 From: John Kitchin Subject: Re: Make wide tables more readable Date: Thu, 1 Dec 2016 16:12:14 -0500 Message-ID: References: <87polbqt2i.fsf@fastmail.fm> Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=94eb2c06d6b09f5ac505429f464c Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:36650) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cCYeQ-00018j-83 for emacs-orgmode@gnu.org; Thu, 01 Dec 2016 16:12:19 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1cCYeO-00034x-VP for emacs-orgmode@gnu.org; Thu, 01 Dec 2016 16:12:18 -0500 Received: from mail-wm0-x22b.google.com ([2a00:1450:400c:c09::22b]:38440) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1cCYeO-00034K-OR for emacs-orgmode@gnu.org; Thu, 01 Dec 2016 16:12:16 -0500 Received: by mail-wm0-x22b.google.com with SMTP id f82so260721219wmf.1 for ; Thu, 01 Dec 2016 13:12:16 -0800 (PST) In-Reply-To: <87polbqt2i.fsf@fastmail.fm> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: "Emacs-orgmode" To: Joost Kremers Cc: David Talmage , "emacs-orgmode@gnu.org" --94eb2c06d6b09f5ac505429f464c Content-Type: text/plain; charset=UTF-8 If I had to guess its because I was unaware of that command when I wrote those functions ;) John ----------------------------------- Professor John Kitchin Doherty Hall A207F Department of Chemical Engineering Carnegie Mellon University Pittsburgh, PA 15213 412-268-7803 @johnkitchin http://kitchingroup.cheme.cmu.edu On Thu, Dec 1, 2016 at 3:43 PM, Joost Kremers wrote: > > 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 > --94eb2c06d6b09f5ac505429f464c Content-Type: text/html; charset=UTF-8 Content-Transfer-Encoding: quoted-printable
If I had to guess its because I was unaware of that comman= d when I wrote those functions ;)

John

-------------------= ----------------
Professor John Kitchin=C2=A0
Doherty Hall A207F
D= epartment of Chemical Engineering
Carnegie Mellon University
Pittsbur= gh, PA 15213
412-268-7803

On Thu, Dec 1, 2016 at 3:43 PM, Joost Kremer= s <joostkremers@fastmail.fm> wrote:

On Thu, Dec 01 2016, John Kitchin wrote:
I use:

;;;###autoload
(defun tq-increase-text-size ()
=C2=A0 "Increase text size."
=C2=A0 (interactive)
=C2=A0 (set-face-attribute 'default nil :height
=C2=A0 =C2=A0 =C2=A0(truncate (* 1.1 (face-attribute 'default :height))= )))

;;;###autoload
(defun tq-decrease-text-size ()
=C2=A0 "Decrease text size."
=C2=A0 (interactive)
=C2=A0 (set-face-attribute 'default nil :height
=C2=A0 =C2=A0 =C2=A0(truncate (* 0.9 (face-attribute 'default :height))= )))

which I bind to C-- and=C2=A0 C-=3D to shrink the font size down until it f= its,
then when I am done increase it.

Why not use `text-scale-adjust`? This function has convenient bindings in t= he 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 un= til you've found your preferred text size.

--
Joost Kremers
Life has its moments

--94eb2c06d6b09f5ac505429f464c--