diff --git a/Hledger/Cli/Options.hs b/Hledger/Cli/Options.hs
index b3b6269c4..2fc414560 100644
--- a/Hledger/Cli/Options.hs
+++ b/Hledger/Cli/Options.hs
@@ -135,7 +135,7 @@ data Opt =
     MonthlyOpt |
     QuarterlyOpt |
     YearlyOpt |
-#ifdef WEB
+#if defined(WEB) || defined(WEB610)
     BaseUrl {value::String} |
     Port    {value::String} |
 #endif
@@ -247,7 +247,7 @@ displayExprFromOpts opts = listtomaybe $ optValuesForConstructor Display opts
       listtomaybe [] = Nothing
       listtomaybe vs = Just $ last vs
 
-#ifdef WEB
+#if defined(WEB) || defined(WEB610)
 -- | Get the value of the (last) baseurl option, if any.
 baseUrlFromOpts :: [Opt] -> Maybe String
 baseUrlFromOpts opts = listtomaybe $ optValuesForConstructor BaseUrl opts