Skip to content

haskell-gargantext
haskell-gargantext
Commit 5bbdf223 authored by Alexandre Delanoë's avatar Alexandre Delanoë
Browse files
Options

[FIX] strict type

parent 7db57862
Pipeline #901 canceled with stage
    Show whitespace changes
    Inline Side-by-side
    Showing with 9 additions and 9 deletions
    src/Gargantext/Database/Admin/Types/Hyperdata.hs
    View file @ 5bbdf223
    ......@@ -312,8 +312,8 @@ instance Hyperdata HyperdataNotebook
    -- | TODO CLEAN
    data HyperData = HyperdataTexts { hd_preferences :: Maybe Text }
    | HyperdataList' { hd_preferences :: Maybe Text}
    data HyperData = HyperdataTexts { hd_preferences :: !(Maybe Text)}
    | HyperdataList' { hd_preferences :: !(Maybe Text)}
    deriving (Show, Generic)
    $(deriveJSON (unPrefix "hd_") ''HyperData)
    ......
    Markdown is supported
    0% or
    You are about to add 0 people to the discussion. Proceed with caution.
    Finish editing this message first!
    Please register or to comment