# HG changeset patch # User Richard M. Stallman # Date 821838269 0 # Node ID d018e8da6435ce7860b1009e548bad358c5f4d08 # Parent 85a1a4ac2663d47b3a6d81e4a8539c2c4da5f4b1 (gnus-group-make-help-group): Check whether `installation-directory' is nil before using it. diff -r 85a1a4ac2663 -r d018e8da6435 lisp/gnus.el --- a/lisp/gnus.el Wed Jan 17 00:22:11 1996 +0000 +++ b/lisp/gnus.el Wed Jan 17 00:24:29 1996 +0000 @@ -4259,7 +4259,9 @@ (defun gnus-group-make-help-group () "Create the Gnus documentation group." (interactive) - (let ((path (cons (concat installation-directory "etc/") load-path)) + (let ((path (if installation-directory + (cons (concat installation-directory "etc/") load-path) + (cons data-directory load-path))) (name (gnus-group-prefixed-name "gnus-help" '(nndoc "gnus-help"))) file) (and (gnus-gethash name gnus-newsrc-hashtb)