From 763237c468b08353bf89a6fb63a0ad75be7892f8 Mon Sep 17 00:00:00 2001 From: Sam Steingold Date: Thu, 15 Dec 2011 22:14:07 -0500 Subject: (Man-getpage-in-background): When running under a window-system, ignore $MANWIDTH and $COLUMNS. --- lisp/man.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lisp/man.el') diff --git a/lisp/man.el b/lisp/man.el index aeba3327c40..3cdbdddb044 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -933,7 +933,8 @@ Return the buffer in which the manpage will appear." ;; minal (using an ioctl(2) if available, the value of ;; $COLUMNS, or falling back to 80 characters if nei- ;; ther is available). - (unless (or (getenv "MANWIDTH") (getenv "COLUMNS")) + (when (or window-system + (not (or (getenv "MANWIDTH") (getenv "COLUMNS")))) ;; This isn't strictly correct, since we don't know how ;; the page will actually be displayed, but it seems ;; reasonable. -- cgit v1.2.1