I use:

(defun tq-increase-text-size ()
  "Increase text size."
  (set-face-attribute 'default nil :height
     (truncate (* 1.1 (face-attribute 'default :height)))))

(defun tq-decrease-text-size ()
  "Decrease text size."
  (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.


Professor John Kitchin
Doherty Hall A207F
Department of Chemical Engineering
Carnegie Mellon University
Pittsburgh, PA 15213

On Thu, Dec 1, 2016 at 3:17 PM, David Talmage <david.talm...@shoutpoint.com>

> I'm looking for ways to make a wide table more readable.  My motivation is
> from a table that is too wide to fit on my screen.  I need to be able to
> see all of the contents of a cell. If it were just text, I'd use M-q
> (fill-paragraph).  I've already tried org-table-wrap-region and couldn't
> figure it out.

Reply via email to