Mirrors/go-inbucket
1
0
Fork 0
mirror of https://github.com/jhillyerd/inbucket.git synced 2025-12-17 17:47:03 +00:00
Code Issues Releases Wiki Activity

ui: Add raw HTML button to message

Browse Source
This commit is contained in:
James Hillyerd
2018-12-15 21:30:13 -08:00
parent ffaf296faa
commit 51d732fa20
1 changed files with 13 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
ui/src/Page/Mailbox.elm
View File

@@ -533,8 +533,20 @@ messageChip model selected message =
viewMessage : Time.Zone -> Message -> Body -> Html Msg viewMessage : Time.Zone -> Message -> Body -> Html Msg
viewMessage zone message bodyMode = viewMessage zone message bodyMode =
let let
htmlUrl =
Api.serveUrl [ "mailbox", message.mailbox, message.id, "html" ]
sourceUrl = sourceUrl =
Api.serveUrl [ "mailbox", message.mailbox, message.id, "source" ] Api.serveUrl [ "mailbox", message.mailbox, message.id, "source" ]
htmlButton =
if message.html == "" then
text ""
else
a
[ href htmlUrl, target "_blank" ]
[ button [] [ text "Raw HTML" ] ]
in in
div [] div []
[ div [ class "button-bar" ] [ div [ class "button-bar" ]
@@ -542,6 +554,7 @@ viewMessage zone message bodyMode =
, a , a
[ href sourceUrl, target "_blank" ] [ href sourceUrl, target "_blank" ]
[ button [] [ text "Source" ] ] [ button [] [ text "Source" ] ]
, htmlButton
] ]
, dl [ class "message-header" ] , dl [ class "message-header" ]
[ dt [] [ text "From:" ] [ dt [] [ text "From:" ]