rvv041 #82
1 changed files with 1 additions and 2 deletions
|
@ -1060,8 +1060,7 @@ appEvent (BT.VtyEvent e) = do
|
|||
BT.modify $
|
||||
set msg $
|
||||
"Address copied to Clipboard from >>\n" ++
|
||||
T.unpack (addressBookAbdescrip (entityVal a)) ++ "->\n" ++
|
||||
T.unpack (addressBookAbaddress (entityVal a)) ++ "!"
|
||||
T.unpack (addressBookAbdescrip (entityVal a))
|
||||
BT.modify $ set displayBox MsgDisplay
|
||||
_ -> do
|
||||
BT.modify $ set msg "Error while copying the address!!"
|
||||
|
|
Loading…
Reference in a new issue