From bda54e8fbebb9ce9c56c7984f40aba2afaf7dede Mon Sep 17 00:00:00 2001
From: eknauel <eknauel>
Date: Sun, 21 Aug 2005 13:46:07 +0000
Subject: [PATCH] ignore tabulator key (completion) in Scheme mode

---
 scheme/nuit-engine.scm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/scheme/nuit-engine.scm b/scheme/nuit-engine.scm
index 5ea0110..b2a3922 100644
--- a/scheme/nuit-engine.scm
+++ b/scheme/nuit-engine.scm
@@ -355,6 +355,7 @@
 
      ;; tab is pressed in the first place, offer completions
      ((and (focus-on-command-buffer?)
+	   (command-buffer-in-command-mode?)
 	   (= ch key-tab))
       (let ((maybe-selector
 	     (offer-completions (last (buffer-text (command-buffer))))))