From eaf1946c2175eccd54181a0242862ba0334c8ab5 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 14 Mar 1994 22:37:58 +0000 Subject: [PATCH] (Man-build-man-command): Redirect desc 2 to /dev/null. (Man-getpage-in-background): Require env before printing message. --- lisp/man.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/man.el b/lisp/man.el index 66dbbf766a5..9ed474f77b6 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -271,7 +271,7 @@ This regular expression should start with a `^' character.") (defun Man-build-man-command () "Builds the entire background manpage and cleaning command." - (let ((command (concat "man " Man-switches " %s 2>&1")) + (let ((command (concat "man " Man-switches " %s 2>/dev/null")) (flist Man-filter-list)) (while flist (let ((pcom (car (car flist))) @@ -451,6 +451,7 @@ start a background process even if a buffer already exists and (not override-reuse-p) buffer) (Man-notify-when-ready buffer) + (require 'env) (message "Invoking man %s in background..." man-args) (setq buffer (generate-new-buffer bufname)) (let ((process-environment (copy-sequence process-environment))) -- 2.39.5