1998-05-31 Jakub Jelinek <jj@ultra.linux.cz>

* complete.c (complete_engine): Fix completions.

src/ChangeLog

@@ -1,3 +1,7 @@
+1998-05-31  Jakub Jelinek <jj@ultra.linux.cz>
+
+	* complete.c (complete_engine): Fix completions.
+
 Sun May 31 10:23:01 1998  Norbert Warmuth  <k3190@fh-sw.de>
 
 	* key.c (define_sequence): If a sequence clashes the last

src/complete.c

@@ -978,6 +978,8 @@ int complete_engine (WInput *in, int what_to_do)
     	    if (insert_text (in, in->completions [0], strlen (in->completions [0]))){
     	        if (in->completions [1])
     	    	    beep ();
+		else
+		    free_completions (in);
 	    } else
 	        beep ();
         }