From f344cd50cac1a7e564903eefce7ac544673b6bf0 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Sun, 15 Feb 2009 02:15:59 -0600
Subject: [PATCH] Single click is sufficient to insert completion in listener

---
 basis/ui/tools/listener/completion/completion.factor | 1 +
 1 file changed, 1 insertion(+)

diff --git a/basis/ui/tools/listener/completion/completion.factor b/basis/ui/tools/listener/completion/completion.factor
index 3144544f0f..867a367655 100644
--- a/basis/ui/tools/listener/completion/completion.factor
+++ b/basis/ui/tools/listener/completion/completion.factor
@@ -145,6 +145,7 @@ GENERIC# accept-completion-hook 1 ( item popup -- )
         >>renderer
         monospace-font >>font
         t >>selection-required?
+        t >>single-click?
         transparent >>column-line-color
         2 >>gap
         dup '[ _ accept-completion ] >>action ;