# HG changeset patch
# User Andreas Schwab <schwab@suse.de>
# Date 1059856538 0
# Node ID f3610e8bfe2d2c3ef6fc0133497a2c14414f8af4
# Parent  c91248761df3e0cf5b8b11e595e284c1ff7b10f3
(apropos-words-to-regexp): Only add `wild' if
`words' has more than one member.

diff -r c91248761df3 -r f3610e8bfe2d lisp/apropos.el
--- a/lisp/apropos.el	Sat Aug 02 20:09:42 2003 +0000
+++ b/lisp/apropos.el	Sat Aug 02 20:35:38 2003 +0000
@@ -1,6 +1,6 @@
 ;;; apropos.el --- apropos commands for users and programmers
 
-;; Copyright (C) 1989, 1994, 1995, 2001, 2002 Free Software Foundation, Inc.
+;; Copyright (C) 1989, 1994, 1995, 2001, 2002, 2003 Free Software Foundation, Inc.
 
 ;; Author: Joe Wells <jbw@bigbird.bu.edu>
 ;; Rewritten: Daniel Pfeiffer <occitan@esperanto.org>
@@ -248,9 +248,10 @@
   "Make regexp matching any two of the words in WORDS."
   (concat "\\("
 	  (mapconcat 'identity words "\\|")
-	  "\\)" wild
+	  "\\)"
 	  (if (cdr words)
-	      (concat "\\("
+	      (concat wild
+		      "\\("
 		      (mapconcat 'identity words "\\|")
 		      "\\)")
 	    "")))