Mercurial > emacs
changeset 50476:14e9fad0af6b
(Man-getpage-in-background): Set GROFF_NO_SGR env var in
all cases, whether or not start-process is fboundp.
| author | Kai Großjohann <kgrossjo@eu.uu.net> |
|---|---|
| date | Mon, 07 Apr 2003 09:32:39 +0000 |
| parents | b65aa1d740eb |
| children | bfaa5e73184f |
| files | lisp/ChangeLog lisp/man.el |
| diffstat | 2 files changed, 6 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun Apr 06 21:12:02 2003 +0000 +++ b/lisp/ChangeLog Mon Apr 07 09:32:39 2003 +0000 @@ -1,3 +1,8 @@ +2003-04-07 Kai Gro,A_(Bjohann <kai.grossjohann@uni-duisburg.de> + + * man.el (Man-getpage-in-background): Set GROFF_NO_SGR env var in + all cases, whether or not start-process is fboundp. + 2003-04-06 Richard M. Stallman <rms@gnu.org> * calendar/cal-menu.el (cal-menu-update): Use easy-menu-create-menu
--- a/lisp/man.el Sun Apr 06 21:12:02 2003 +0000 +++ b/lisp/man.el Mon Apr 07 09:32:39 2003 +0000 @@ -667,12 +667,12 @@ ;; 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)))