From 8ddbb295aabb24362c49dd368b64a08cd48c3aa9 Mon Sep 17 00:00:00 2001
From: "c.lopez" <c.lopez@kmels.net>
Date: Sat, 9 Feb 2013 20:04:56 +0100
Subject: spawn command when no completion is available (if alwaysHighlight is
 True); changes commandToComplete in Prompt/Shell to complete the whole word
 instead of using getLastWord

Ignore-this: ca7d354bb301b555b64d5e76e31d10e8

darcs-hash:20130209190456-c3db2-5bb4a8a2aa97c180814ca90a090054efc36d4cfe.gz
---
 XMonad/Prompt/Shell.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'XMonad/Prompt/Shell.hs')

diff --git a/XMonad/Prompt/Shell.hs b/XMonad/Prompt/Shell.hs
index 05ee5f4..93308bc 100644
--- a/XMonad/Prompt/Shell.hs
+++ b/XMonad/Prompt/Shell.hs
@@ -62,6 +62,7 @@ data Shell = Shell
 instance XPrompt Shell where
     showXPrompt Shell     = "Run: "
     completionToCommand _ = escape
+    commandToComplete _ c = c
 
 shellPrompt :: XPConfig -> X ()
 shellPrompt c = do
-- 
cgit v1.2.3