TheAnachronism/docspell
1
0
Fork 0
mirror of https://github.com/TheAnachronism/docspell.git synced 2025-06-23 10:58:26 +00:00
Code Issues Packages Projects Releases Wiki Activity

Add some static links to the dashboard

Browse Source
This commit is contained in:
eikek
2022-01-26 21:21:19 +01:00
parent e6775f77dc
commit 631450cb16
24 changed files with 736 additions and 146 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
modules/webapp/src/main/elm/App/Update.elm
View File

@ -14,7 +14,7 @@ import Api
import App.Data exposing (..)
import Browser exposing (UrlRequest(..))
import Browser.Navigation as Nav
import Data.Flags exposing (Flags)
import Data.Flags
import Data.ServerEvent exposing (ServerEvent(..))
import Data.UiSettings exposing (UiSettings)
import Data.UiTheme
@ -160,7 +160,7 @@ updateWithSub msg model =
updateItemDetail texts m model
DashboardMsg m ->
updateDashboard m model
updateDashboard texts m model
VersionResp (Ok info) ->
( { model | version = info }, Cmd.none, Sub.none )
@ -371,15 +371,15 @@ applyClientSettings texts model settings =
{ model | uiSettings = settings }
updateDashboard : Page.Dashboard.Data.Msg -> Model -> ( Model, Cmd Msg, Sub Msg )
updateDashboard lmsg model =
updateDashboard : Messages -> Page.Dashboard.Data.Msg -> Model -> ( Model, Cmd Msg, Sub Msg )
updateDashboard texts lmsg model =
let
( dbm, dbc ) =
Page.Dashboard.Update.update model.flags lmsg model.dashboardModel
( dbm, dbc, dbs ) =
Page.Dashboard.Update.update texts.dashboard model.flags lmsg model.dashboardModel
in
( { model | dashboardModel = dbm }
, Cmd.map DashboardMsg dbc
, Sub.none
, Sub.map DashboardMsg dbs
)

7
modules/webapp/src/main/elm/App/View2.elm
View File

@ -11,6 +11,7 @@ import Api.Model.AuthResult exposing (AuthResult)
import App.Data exposing (..)
import Comp.Basic as B
import Data.Flags
import Data.Icons as Icons
import Html exposing (..)
import Html.Attributes exposing (..)
import Html.Events exposing (onClick)
@ -299,7 +300,7 @@ dataMenu texts _ model =
, dataPageLink model
SearchPage
[]
[ i [ class "fa fa-search w-6" ] []
[ Icons.searchIcon "w-6"
, span [ class "ml-1" ]
[ text texts.items
]
@ -307,7 +308,7 @@ dataMenu texts _ model =
, dataPageLink model
ManageDataPage
[]
[ i [ class "fa fa-cubes w-6" ] []
[ Icons.metadataIcon "w-6"
, span [ class "ml-1" ]
[ text texts.manageData
]
@ -361,7 +362,7 @@ dataMenu texts _ model =
, target "_new"
, title "Opens https://docspell.org/docs"
]
[ i [ class "fa fa-question-circle w-6" ] []
[ Icons.documentationIcon "w-6"
, span [ class "ml-1" ] [ text texts.help ]
, span [ class "float-right" ]
[ i [ class "fa fa-external-link-alt w-6" ] []