summaryrefslogtreecommitdiffhomepage
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/Bitmap.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Bitmap.hs b/src/Bitmap.hs
index 1acc0b7..11728d4 100644
--- a/src/Bitmap.hs
+++ b/src/Bitmap.hs
@@ -86,9 +86,10 @@ loadBitmap d w p = do
exist <- doesFileExist p
if exist
then do
- res <- runExceptT $ tryXBM
#ifdef XPM
- <|> tryXPM
+ res <- runExceptT (tryXBM <|> tryXPM)
+#else
+ res <- runExceptT tryXBM
#endif
case res of
Right b -> return $ Just b