diff options
| author | Andreas Schwab <schwab@suse.de> | 1998-09-18 09:13:46 +0000 |
|---|---|---|
| committer | Andreas Schwab <schwab@suse.de> | 1998-09-18 09:13:46 +0000 |
| commit | e46744bc2a83c782f9e05483448456e5fbb472fd (patch) | |
| tree | f9b2cbfb4a1de21b89af225a57b9f52c99908239 | |
| parent | c45a677ff63dac66910606d4020bf0528e4bf44d (diff) | |
| download | emacs-e46744bc2a83c782f9e05483448456e5fbb472fd.tar.gz | |
(Man-init-defvars): Avoid trailing nil on
Man-filter-list.
| -rw-r--r-- | lisp/man.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/man.el b/lisp/man.el index 47475d28b2d..b51189985a0 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -381,7 +381,8 @@ This is necessary if one wants to dump man.el with emacs." nil)))) (setq Man-filter-list - (list + ;; Avoid trailing nil which confuses customize. + (apply 'list (cons Man-sed-command (list @@ -415,9 +416,10 @@ This is necessary if one wants to dump man.el with emacs." "'" )) (if (not Man-uses-untabify-flag) - (cons - Man-untabify-command - Man-untabify-command-args) + ;; The outer list will be stripped off by apply. + (list (cons + Man-untabify-command + Man-untabify-command-args)) ))) ) |