From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 13 Aug 1998 05:05:44 +0000 (+0000)
Subject: (PC-do-completion): Exclude ./ and ../ from completion.
X-Git-Tag: emacs-20.3~70
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=06cab6db58bbb70007257887df23097e14f2706e;p=emacs.git

(PC-do-completion): Exclude ./ and ../ from completion.
---

diff --git a/lisp/complete.el b/lisp/complete.el
index 4aaffa76b0c..e51a9f33402 100644
--- a/lisp/complete.el
+++ b/lisp/complete.el
@@ -562,10 +562,12 @@ of `minibuffer-completion-table' and the minibuffer contents.")
 				  "\\|")
 				 "\\)\\'")))
 
-	       ;; Check if there are any without an ignored extension
+	       ;; Check if there are any without an ignored extension.
+	       ;; Also ignore `.' and `..'.
 	       (setq p nil)
 	       (while p2
 		 (or (string-match PC-ignored-regexp (car p2))
+		     (string-match "\\(\\`\\|/\\)[.][.]?/?\\'" (car p2))
 		     (setq p (cons (car p2) p)))
 		 (setq p2 (cdr p2)))