[PATCH] Avoid raising an error in haskell-flymake-init

0001-Avoid-raising-an-error-in-haskell-flymake-init.patch

From 0440ba99a4ca4dd6285756a4af20f8706870171b Mon Sep 17 00:00:00 2001
From: Leo <sdl.web@gmail.com>
Date: Tue, 20 Dec 2011 22:19:53 +0800
Subject: [PATCH] Avoid raising an error in haskell-flymake-init

---
 haskell-mode.el |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/haskell-mode.el b/haskell-mode.el
index 4f1e9a67..82bf10f5 100644
--- a/haskell-mode.el
+++ b/haskell-mode.el
@@ -608,7 +608,8 @@ (autoload 'flymake-init-create-temp-buffer-copy "flymake")
 (defun haskell-flymake-init ()
   "Flymake init function for Haskell.
 To be added to `flymake-init-create-temp-buffer-copy'."
-  (let ((checker-elts (split-string haskell-saved-check-command)))
+  (let ((checker-elts (and haskell-saved-check-command
+			   (split-string haskell-saved-check-command))))
     (list (car checker-elts)
 	  (append (cdr checker-elts)
 		  (list (flymake-init-create-temp-buffer-copy
-- 
1.7.8