(Man-getpage-in-background): Set GROFF_NO_SGR env var in

all cases, whether or not start-process is fboundp.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c0df194b86e..49066a27d60 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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
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)))