# HG changeset patch # User Roland McGrath # Date 737606536 0 # Node ID 7a48e4a67e8c9cf8180fae2b897c52649bee0952 # Parent 086fda6b2041329c51c7f889dca0b061d4742c6f (gnus-info-directory): Variable removed. (gnus-info-find-node): Don't use it. diff -r 086fda6b2041 -r 7a48e4a67e8c lisp/=gnus.el --- a/lisp/=gnus.el Sun May 16 23:09:57 1993 +0000 +++ b/lisp/=gnus.el Mon May 17 02:42:16 1993 +0000 @@ -1,6 +1,6 @@ ;;; GNUS: an NNTP-based News Reader for GNU Emacs ;; Copyright (C) 1987, 1988, 1989, 1990, 1993 Free Software Foundation, Inc. -;; $Header: gnus.el,v 3.15 93/05/10 19:49:20 umerin Locked $ +;; $Header: /gd/gnu/emacs/19.0/lisp/RCS/gnus.el,v 1.14 1993/05/16 22:40:14 rms Exp roland $ ;; This file is part of GNU Emacs. @@ -597,10 +597,6 @@ (defvar gnus-use-generic-path nil "*If nil, use the NNTP server name in the Path: field; if stringp, use this; if non-nil, use no host name (user name only)") - -(defvar gnus-info-directory Info-directory - "*A directory placing an Info file of GNUS.") - ;; Internal variables. @@ -5813,8 +5809,7 @@ ((eq major-mode 'gnus-summary-mode) (gnus-configure-windows '(0 1 0)) ;Take all windows. (pop-to-buffer gnus-summary-buffer))) - (let ((Info-directory (expand-file-name gnus-info-directory nil))) - (Info-goto-node (car (cdr (assq major-mode gnus-info-nodes)))))) + (Info-goto-node (car (cdr (assq major-mode gnus-info-nodes))))) (defun gnus-overload-functions (&optional overloads) "Overload functions specified by optional argument OVERLOADS.