diff --git a/backup/main.pas b/backup/main.pas
index e2e941b..8076c5b 100644
--- a/backup/main.pas
+++ b/backup/main.pas
@@ -2839,12 +2839,12 @@ begin
    keydesc := 'Hyper';
 
   if isExtra1 then
-   keydesc := 'Extra1'
+   keydesc := 'Extra1';
 
   if isExtra2 then
-   keydesc := 'Extra2'
+   keydesc := 'Extra2';
 
-  if isAlt then
+  if isAlt or isMeta then
   begin
     result := OPEN_APPLE;
     keydesc := 'Alt';
diff --git a/main.pas b/main.pas
index f5f18de..0f065d4 100644
--- a/main.pas
+++ b/main.pas
@@ -2844,7 +2844,7 @@ begin
   if isExtra2 then
    keydesc := 'Extra2';
 
-  if isAlt then
+  if isAlt or isMeta then
   begin
     result := OPEN_APPLE;
     keydesc := 'Alt';
@@ -2991,7 +2991,7 @@ begin
   code := MapKeyCode(Key,Shift);
   if code <> 0 then
      SendKey( code, 0, 1, MapShiftState(Key, Shift) );
-  StatusBar1.SimpleText := keydesc;
+  //StatusBar1.SimpleText := keydesc;
 end;
 
 procedure TGUIForm.FormKeyPress(Sender: TObject; var Key: char);