diff options
| author | Kai Großjohann <kgrossjo@eu.uu.net> | 2003-04-07 09:32:39 +0000 |
|---|---|---|
| committer | Kai Großjohann <kgrossjo@eu.uu.net> | 2003-04-07 09:32:39 +0000 |
| commit | 2c17111abc2e31b9df9d5a418252912234fdf149 (patch) | |
| tree | 6f51537b5794c9ab6dbbc8cf1dae1aadb460b699 /lisp/man.el | |
| parent | 333c5fc5b9b3ad85a2c906c8e2e3a548ec04e49e (diff) | |
| download | emacs-2c17111abc2e31b9df9d5a418252912234fdf149.tar.gz | |
(Man-getpage-in-background): Set GROFF_NO_SGR env var in
all cases, whether or not start-process is fboundp.
Diffstat (limited to 'lisp/man.el')
| -rw-r--r-- | lisp/man.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/man.el b/lisp/man.el index a6244b2d0f0..af69340aba3 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -667,12 +667,12 @@ all sections related to a subject, put something appropriate into the ;; the page will actually be displayed, but it seems ;; reasonable. (setenv "COLUMNS" (number-to-string (frame-width))))) + (setenv "GROFF_NO_SGR" "1") (if (fboundp 'start-process) (set-process-sentinel (start-process manual-program buffer "sh" "-c" (format (Man-build-man-command) man-args)) 'Man-bgproc-sentinel) - (setenv "GROFF_NO_SGR" "1") (let ((exit-status (call-process shell-file-name nil (list buffer nil) nil "-c" (format (Man-build-man-command) man-args))) |