Mercurial > emacs

changeset 42575:24c994803548

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(top-level): Revert previous change.
author Pavel Janík <Pavel@Janik.cz>
date Sun, 06 Jan 2002 16:38:33 +0000
parents fcac9cd201ad
children 51d2b18921dd
files lisp/net/eudc.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/net/eudc.el	Sun Jan 06 16:37:36 2002 +0000
+++ b/lisp/net/eudc.el	Sun Jan 06 16:38:33 2002 +0000
@@ -4,7 +4,7 @@
 
 ;; Author: Oscar Figueiredo <oscar@xemacs.org>
 ;; Maintainer: Oscar Figueiredo <oscar@xemacs.org>
-;; Keywords: help
+;; Keywords: comm
 
 ;; This file is part of GNU Emacs.
 
@@ -622,7 +622,7 @@
       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 @@
   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]