From ff41c6f670bbfcf71e3c89ee8ef64bda04f29de9 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Pavel=20Jan=C3=ADk?= Date: Sun, 6 Jan 2002 16:41:07 +0000 Subject: [PATCH] (top-level): Revert previous change. --- lisp/ChangeLog | 6 ++++-- lisp/net/eudc.el | 6 +++--- 2 files changed, 7 insertions(+), 5 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7742823155e..e40d0303778 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2002-01-06 Pavel Jan,Bm(Bk + * net/eudc.el (top-level): Revert previous change. + * net/net-utils.el (nslookup-font-lock-keywords): Defvar font-lock variables to prevent warning from byte-compiler. @@ -5776,7 +5778,7 @@ * textmodes/reftex-ref.el, textmodes/reftex-sel.el, * textmodes/reftex-toc.el, textmodes/reftex-vars.el, * textmodes/reftex.el: Some fixes to follow coding - conventions in Eshell files with known maintainers. + conventions in Elisp files with known maintainers. * emulation/viper.el: A fix to follow coding conventions. @@ -5790,7 +5792,7 @@ * eshell/esh-mode.el, eshell/esh-module.el, eshell/esh-opt.el, * eshell/esh-proc.el, eshell/esh-test.el, eshell/esh-util.el, * eshell/esh-var.el, eshell/eshell.el: Some fixes to follow coding - conventions in Eshell files. + conventions in Elisp files. * composite.el, diff.el, emacs-lisp/levents.el, * emacs-lisp/lmenu.el, emacs-lisp/lselect.el, emacs-lisp/lucid.el, diff --git a/lisp/net/eudc.el b/lisp/net/eudc.el index 78076e5ee5f..ba46daad44d 100644 --- a/lisp/net/eudc.el +++ b/lisp/net/eudc.el @@ -4,7 +4,7 @@ ;; Author: Oscar Figueiredo ;; Maintainer: Oscar Figueiredo -;; Keywords: help +;; Keywords: comm ;; This file is part of GNU Emacs. @@ -622,7 +622,7 @@ otherwise they are formatted according to `eudc-user-attribute-names-alist'." result))) (defun eudc-filter-partial-records (records attrs) - "Eliminate records that do not caontain all ATTRS from RECORDS." + "Eliminate records that do not contain all ATTRS from RECORDS." (delq nil (mapcar (function @@ -1240,7 +1240,7 @@ This does nothing except loading eudc by autoload side-effect." nil) ;;;###autoload -(cond ((not eudc-xemacs-p) +(cond ((not (string-match "XEmacs" emacs-version)) (defvar eudc-tools-menu (make-sparse-keymap "Directory Search")) (fset 'eudc-tools-menu (symbol-value 'eudc-tools-menu)) (define-key eudc-tools-menu [phone] -- 2.39.5