diff --git a/haskell-cabal.el b/haskell-cabal.el
index 971f41125..283bbbf72 100644
--- a/haskell-cabal.el
+++ b/haskell-cabal.el
@@ -180,7 +180,7 @@ there is no corresponding setting with that name in the .cabal
 file), then this function returns nil."
   (interactive)
   (when (and name buffer-file-name)
-    (let ((cabal-file (haskell-cabal-find-file (file-name-directory buffer-file-name))))
+    (let ((cabal-file (haskell-cabal-find-file)))
       (when (and cabal-file (file-readable-p cabal-file))
         (with-temp-buffer
           (insert-file-contents cabal-file)