]> code.delx.au - gnu-emacs/commitdiff
Fix last change -- undo the following part of that change:
authorKim F. Storm <storm@cua.dk>
Thu, 8 Feb 2007 08:56:11 +0000 (08:56 +0000)
committerKim F. Storm <storm@cua.dk>
Thu, 8 Feb 2007 08:56:11 +0000 (08:56 +0000)
(do_completion, Fminibuffer_complete_word):
If Vminibuffer_completing_file_name equals Qlambda, treat it as Qnil.

src/minibuf.c

index 9a25c3ee278a7f66226d3a21ea712a535e0b23e2..19835f1d213ab03f415f7f8e67e264e323827e75 100644 (file)
@@ -2012,7 +2012,6 @@ do_completion ()
       /* Some completion happened */
 
       if (! NILP (Vminibuffer_completing_file_name)
-         && ! EQ (Vminibuffer_completing_file_name, Qlambda)
          && SREF (completion, SBYTES (completion) - 1) == '/'
          && PT < ZV
          && FETCH_CHAR (PT_BYTE) == '/')
@@ -2302,8 +2301,7 @@ Return nil if there is no valid completion, else t.  */)
     GCPRO2 (completion, tem);
     /* If reading a file name,
        expand any $ENVVAR refs in the buffer and in TEM.  */
-    if (! NILP (Vminibuffer_completing_file_name)
-       && ! EQ (Vminibuffer_completing_file_name, Qlambda))
+    if (! NILP (Vminibuffer_completing_file_name))
       {
        Lisp_Object substituted;
        substituted = Fsubstitute_in_file_name (tem);
@@ -2418,7 +2416,6 @@ Return nil if there is no valid completion, else t.  */)
   /* Otherwise insert in minibuffer the chars we got */
 
   if (! NILP (Vminibuffer_completing_file_name)
-      && ! EQ (Vminibuffer_completing_file_name, Qlambda)
       && SREF (completion, SBYTES (completion) - 1) == '/'
       && PT < ZV
       && FETCH_CHAR (PT_BYTE) == '/')