From 3c2b302a5f149e26a06b5cb2e07122f780fc22e1 Mon Sep 17 00:00:00 2001
From: James Hillyerd <james@hillyerd.com>
Date: Sat, 16 Feb 2019 09:35:41 -0800
Subject: [PATCH] ui: Fix Source & Raw HTML tab nav

---
 ui/src/Page/Mailbox.elm | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/ui/src/Page/Mailbox.elm b/ui/src/Page/Mailbox.elm
index be43ec0..7bcb131 100644
--- a/ui/src/Page/Mailbox.elm
+++ b/ui/src/Page/Mailbox.elm
@@ -17,6 +17,7 @@ import Html.Attributes
         , id
         , placeholder
         , property
+        , tabindex
         , target
         , type_
         , value
@@ -586,18 +587,16 @@ viewMessage zone message bodyMode =
                 text ""
 
             else
-                a
-                    [ href htmlUrl, target "_blank" ]
-                    [ button [] [ text "Raw HTML" ] ]
+                a [ href htmlUrl, target "_blank" ]
+                    [ button [ tabindex -1 ] [ text "Raw HTML" ] ]
     in
     div []
         [ div [ class "button-bar" ]
             [ button [ class "message-close light", onClick CloseMessage ]
                 [ i [ class "fas fa-arrow-left" ] [] ]
             , button [ class "danger", onClick (DeleteMessage message) ] [ text "Delete" ]
-            , a
-                [ href sourceUrl, target "_blank" ]
-                [ button [] [ text "Source" ] ]
+            , a [ href sourceUrl, target "_blank" ]
+                [ button [ tabindex -1 ] [ text "Source" ] ]
             , htmlButton
             ]
         , dl [ class "message-header" ]