lts-16.13 + maybe call those plugins with make 'srcPlugins' because it's going to be a massive PITA to develop them if I have to build them with ghc --make
This commit is contained in:
parent
618d7f6cb4
commit
aea2f79138
@ -6,8 +6,8 @@ import Data.Maybe
|
||||
import Control.Concurrent.STM
|
||||
import Control.Concurrent.STM.TMVar
|
||||
|
||||
pluginPath :: IO FilePath
|
||||
pluginPath = getXdgDirectory XdgData "gypsfulvus/plugins" >>= makeAbsolute
|
||||
srcPluginPath :: IO FilePath
|
||||
srcPluginPath = getXdgDirectory XdgData "gypsfulvus/src_plugins" >>= makeAbsolute
|
||||
|
||||
|
||||
configPath :: IO FilePath
|
||||
@ -21,11 +21,11 @@ configPath = getXdgDirectory XdgConfig "gypsfulvus"
|
||||
|
||||
|
||||
loadCommsPlugins canary collectorChannel =
|
||||
let potentialPlugins = pluginPath >>= \pp -> listDirectory pp >>= filterM (\fuku -> doesDirectoryExist (pp ++ "/" ++ fuku)) >>= mapM (\fuku -> return (pp ++ "/" ++ fuku))
|
||||
let potentialPlugins = srcPluginPath >>= \pp -> listDirectory pp >>= filterM (\fuku -> doesDirectoryExist (pp ++ "/" ++ fuku)) >>= mapM (\fuku -> return (pp ++ "/" ++ fuku))
|
||||
in do
|
||||
pluginPath >>= putStrLn
|
||||
pluginPath >>= listDirectory >>= mapM putStrLn
|
||||
pluginPath >>= \pp -> listDirectory pp >>= filterM (\fuku -> putStrLn (pp ++ "/" ++ fuku) >> doesDirectoryExist (pp ++ "/" ++ fuku))
|
||||
srcPluginPath >>= putStrLn
|
||||
srcPluginPath >>= listDirectory >>= mapM putStrLn
|
||||
srcPluginPath >>= \pp -> listDirectory pp >>= filterM (\fuku -> putStrLn (pp ++ "/" ++ fuku) >> doesDirectoryExist (pp ++ "/" ++ fuku))
|
||||
pp <- potentialPlugins
|
||||
mapM_ putStrLn pp
|
||||
ff <- mapM (\d -> findFile [d] "Plugin.hs") pp
|
||||
|
@ -17,8 +17,8 @@
|
||||
#
|
||||
# resolver: ./custom-snapshot.yaml
|
||||
# resolver: https://example.com/snapshots/2018-01-01.yaml
|
||||
#resolver: lts-16.13
|
||||
resolver: lts-14.27
|
||||
resolver: lts-16.13
|
||||
#resolver: lts-14.27
|
||||
# User packages to be built.
|
||||
# Various formats can be used as shown in the example below.
|
||||
#
|
||||
@ -35,7 +35,8 @@ packages:
|
||||
# forks / in-progress versions pinned to a git hash. For example:
|
||||
#
|
||||
extra-deps:
|
||||
- plugins-1.6.0
|
||||
- git: git@github.com:v-e-h/plugins.git
|
||||
commit: e175d3c2ea9a8cc08126d37d9e30a327d8dc8b29
|
||||
# - acme-missiles-0.3
|
||||
# - git: https://github.com/commercialhaskell/stack.git
|
||||
# commit: e7b331f14bcffb8367cd58fbfc8b40ec7642100a
|
||||
|
@ -5,15 +5,22 @@
|
||||
|
||||
packages:
|
||||
- completed:
|
||||
hackage: plugins-1.6.0@sha256:5eb50363b5f7a5539d91db5ce245adc2fd5bec634c58ad8c9498fcfd1c183d69,2531
|
||||
cabal-file:
|
||||
size: 2531
|
||||
sha256: 5eb50363b5f7a5539d91db5ce245adc2fd5bec634c58ad8c9498fcfd1c183d69
|
||||
name: plugins
|
||||
version: 1.6.0
|
||||
git: git@github.com:v-e-h/plugins.git
|
||||
pantry-tree:
|
||||
size: 1526
|
||||
sha256: 2805b6d574a4603833a17ce18974f7fbbdafba3db281dd3400422e3a36cb5762
|
||||
size: 34501
|
||||
sha256: bcd754b80924fc9c852557ea2a79947eab426e7fc6ef07ae82bccac9e7c4ab91
|
||||
commit: e175d3c2ea9a8cc08126d37d9e30a327d8dc8b29
|
||||
original:
|
||||
hackage: plugins-1.6.0
|
||||
git: git@github.com:v-e-h/plugins.git
|
||||
commit: e175d3c2ea9a8cc08126d37d9e30a327d8dc8b29
|
||||
snapshots:
|
||||
- completed:
|
||||
size: 524996
|
||||
url: https://raw.githubusercontent.com/commercialhaskell/stackage-snapshots/master/lts/14/27.yaml
|
||||
sha256: 7ea31a280c56bf36ff591a7397cc384d0dff622e7f9e4225b47d8980f019a0f0
|
||||
original: lts-14.27
|
||||
size: 532381
|
||||
url: https://raw.githubusercontent.com/commercialhaskell/stackage-snapshots/master/lts/16/13.yaml
|
||||
sha256: 6ee17f7996e5bc75ae4406250841f1362ad4196418a4d90a0615ff4f26ac98df
|
||||
original: lts-16.13
|
||||
|
Loading…
x
Reference in New Issue
Block a user