diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs
index 59a734a..6a3d3d5 100644
--- a/.xmonad/xmonad.hs
+++ b/.xmonad/xmonad.hs
@@ -218,7 +218,7 @@ dtXPConfig = def
 calcPrompt :: XPConfig -> String -> X () 
 calcPrompt c ans =
     inputPrompt c (trim ans) ?+ \input -> 
-        liftIO(runProcessWithInput "whereis" [input] "") >>= calcPrompt c 
+        liftIO(runProcessWithInput "qalc" [input] "") >>= calcPrompt c 
     where
         trim  = f . f
             where f = reverse . dropWhile isSpace