Add AGPL conditional flag

Author: fendor

exe/Main.hs

@@ -92,7 +92,9 @@ import Ide.Plugin.Example2                as Example2
 import Ide.Plugin.GhcIde                  as GhcIde
 import Ide.Plugin.Floskell                as Floskell
 import Ide.Plugin.Ormolu                  as Ormolu
+#if AGPL
 import Ide.Plugin.Brittany                as Brittany
+#endif
 import Ide.Plugin.Pragmas                 as Pragmas
 
 
@@ -114,18 +116,20 @@ idePlugins includeExamples = pluginDescToIdePlugins allPlugins
     basePlugins =
       [
       --   applyRefactDescriptor "applyrefact"
-        Brittany.descriptor    "brittany"
       -- , haddockDescriptor     "haddock"
       -- , hareDescriptor        "hare"
       -- , hsimportDescriptor    "hsimport"
       -- , liquidDescriptor      "liquid"
       -- , packageDescriptor     "package"
-      , GhcIde.descriptor  "ghcide"
+      GhcIde.descriptor  "ghcide"
       , Pragmas.descriptor  "pragmas"
       , Floskell.descriptor "floskell"
       -- , genericDescriptor     "generic"
       -- , ghcmodDescriptor      "ghcmod"
       , Ormolu.descriptor   "ormolu"
+#if AGPL
+      , Brittany.descriptor    "brittany"
+#endif
       ]
     examplePlugins =
       [Example.descriptor  "eg"
@@ -173,7 +177,6 @@ main = do
         options = def { LSP.executeCommandCommands = Just commandIds
                       , LSP.completionTriggerCharacters = Just "."
                       }
-
     if argLSP then do
         t <- offsetTime
         hPutStrLn stderr "Starting (haskell-language-server)LSP server..."

haskell-language-server.cabal

@@ -1,4 +1,4 @@
-cabal-version: 1.12
+cabal-version:  2.2
 category:       Development
 name:           haskell-language-server
 version:        0.1.0.0
@@ -16,6 +16,11 @@ extra-source-files:
     README.md
     ChangeLog.md
 
+flag agpl
+  Description: Enable AGPL dependencies
+  Default:     True
+  Manual:      False
+
 flag pedantic
   Description: Enable -Werror
   Default:     False
@@ -25,12 +30,17 @@ source-repository head
   type: git
   location: https://github.com/haskell/haskell-language-server
 
+common agpl
+  if flag(agpl)
+    cpp-options:
+      -DAGPL
+
 library
+  import: agpl
   exposed-modules:
       Ide.Cradle
       Ide.Logger
       Ide.Plugin
-      Ide.Plugin.Brittany
       Ide.Plugin.Config
       Ide.Plugin.Example
       Ide.Plugin.Example2
@@ -49,7 +59,6 @@ library
       base >=4.7 && <5
     , aeson
     , binary
-    , brittany
     , bytestring
     , Cabal
     , cabal-helper >= 1.0
@@ -79,6 +88,12 @@ library
     build-depends:     Win32
   else
     build-depends:     unix
+  if flag(agpl)
+    build-depends:
+      brittany
+    exposed-modules:
+      Ide.Plugin.Brittany
+
   if impl(ghc >= 8.6)
      build-depends: ormolu >= 0.0.3.1
 
@@ -92,6 +107,7 @@ library
   default-language: Haskell2010
 
 executable haskell-language-server
+  import: agpl
   main-is: Main.hs
   hs-source-dirs:
       exe
@@ -152,6 +168,7 @@ executable haskell-language-server
   default-language: Haskell2010
 
 executable haskell-language-server-wrapper
+  import: agpl
   main-is: Wrapper.hs
   hs-source-dirs:
       exe
@@ -189,6 +206,7 @@ executable haskell-language-server-wrapper
 
 
 test-suite func-test
+  import: agpl
   type: exitcode-stdio-1.0
   default-language: Haskell2010
   build-tool-depends:  hspec-discover:hspec-discover
@@ -246,6 +264,7 @@ test-suite func-test
   --       Development.IDE.Test.Runfiles
 
 library hls-test-utils
+  import: agpl
   hs-source-dirs:      test/utils
   exposed-modules:     TestUtils
   build-depends:       base