Update Keycheck.xml

Fixed underline issue

Keycheck.xml

@@ -162,7 +162,7 @@ function keyEnd()
 
    for _, key in ipairs(keyringList) do
       stopLoc = #strip_colours(key.keyName) + 14
-      local links = {{label = "Set area for key", start = 14, stop = stopLoc, text = "a='" .. key.keyName .. "';DoAfterSpecial(.1, 'addArea(a)', 12)"}}
+      local links = {{label = "Set area for key", start = 15, stop = stopLoc, text = "a='" .. key.keyName .. "';DoAfterSpecial(.1, 'addArea(a)', 12)"}}
       local area = keyAreas[key.keyName] or "Unknown"
       local addLine =keyString:format(key.keyID, key.keyName .. string.rep(" ", 42-#strip_colours(key.keyName)), convertTime(key.keyExpiry), area)
       keyringWin:add_text(addLine, true, links)