Fix undefined reference to shm-display-quarantine in haskell-present

jwiegley · Jan 15, 2014 · 9292ba1 · 9292ba1
1 parent fa1b365
commit 9292ba1
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/haskell-presentation-mode.el b/haskell-presentation-mode.el
@@ -42,7 +42,8 @@ SESSION as the current haskell-session."
          (buffer (get-buffer-create name)))
     (with-current-buffer buffer
       (haskell-presentation-mode)
-      (set (make-local-variable 'shm-display-quarantine) nil)
+      (if (boundp 'shm-display-quarantine)
+          (set (make-local-variable 'shm-display-quarantine) nil))
       (let ((buffer-read-only nil))
         (erase-buffer)
         (insert (propertize "-- Hit `q' to close this window.\n\n"