Display improvements

[DOBEN]

Description

• Singular use if only one event is found, e.g.
  ./concordium-client transaction status b6cd9cb0c281d90cd5e9e82f1171b7b6ca7ec6bab12e2b9d48d4224e91434faf (testnet)

• Add dot after the expression since all other expressions also have a dot, e.g.
  ./concordium-client transaction status fcdfd6fbcb2e1b47d22918edf8f701805a92b84cdb647d4061480cf765a8c381 (testnet)
  
  

[DOBEN]

Regarding the second bulletpoint, there is a function that might help streamline expressions/punctuation but the initial investigation seems there is more work to do to make the expressions/punctuation consistent.

-- | Ensure that a string is printable as a sentence by converting the first letter to upper case
--  and, unless it already ends with "standard" punctuation, appending the provided punctionation.
prettyMsg :: String -> String -> String
prettyMsg punctuation = \case
    "" -> ""
    (x : xs) ->
        let s =
                if null xs || last xs `elem` p
                    then xs
                    else xs ++ punctuation
        in  (C.toUpper x) : s
  where
    p = ".,:;?!{}" :: String