File fb_keys.diff of Package frozen-bubble

Overview Repositories Revisions Requests Users Attributes Meta

File fb_keys.diff of Package frozen-bubble (Revision 59d4b471271db6c421570f61a9b526b4)

Currently displaying revision 59d4b471271db6c421570f61a9b526b4 , Show latest

--- frozen-bubble.orig	2007-01-17 09:40:10.000000000 +0100
+++ frozen-bubble	2007-01-17 09:40:19.000000000 +0100
@@ -4879,18 +4879,18 @@
     my $change_keys = sub {
 	ask_from({ intro => [ t("Please enter new keys:") ],
 		   entries => [
-			       { 'q' => t("Player 1; turn left?"),  'a' => \$KEYS->{p1}{left},  f => 'ONE_CHAR' },
-			       { 'q' => t("Player 1; turn right?"), 'a' => \$KEYS->{p1}{right}, f => 'ONE_CHAR' },
-			       { 'q' => t("Player 1; fire?"),  'a' => \$KEYS->{p1}{fire},  f => 'ONE_CHAR' },
-			       { 'q' => t("Player 1; center?"),  'a' => \$KEYS->{p1}{center},  f => 'ONE_CHAR' },
+			       { 'q' => t("Player 1; turn left (%s)?",keysym_to_char($KEYS->{p1}{left})),  'a' => \$KEYS->{p1}{left},  f => 'ONE_CHAR' },
+			       { 'q' => t("Player 1; turn right (%s)?",keysym_to_char($KEYS->{p1}{right})), 'a' => \$KEYS->{p1}{right}, f => 'ONE_CHAR' },
+			       { 'q' => t("Player 1; fire (%s)?",keysym_to_char($KEYS->{p1}{fire})),  'a' => \$KEYS->{p1}{fire},  f => 'ONE_CHAR' },
+			       { 'q' => t("Player 1; center (%s)?",keysym_to_char($KEYS->{p1}{center})),  'a' => \$KEYS->{p1}{center},  f => 'ONE_CHAR' },
                                { f => 'SPACE' },
-			       { 'q' => t("Player 2; turn left?"),  'a' => \$KEYS->{p2}{left},  f => 'ONE_CHAR' },
-			       { 'q' => t("Player 2; turn right?"), 'a' => \$KEYS->{p2}{right}, f => 'ONE_CHAR' },
-			       { 'q' => t("Player 2; fire?"),  'a' => \$KEYS->{p2}{fire},  f => 'ONE_CHAR' },
-			       { 'q' => t("Player 2; center?"),  'a' => \$KEYS->{p2}{center},  f => 'ONE_CHAR' },
+			       { 'q' => t("Player 2; turn left (%s)?",keysym_to_char($KEYS->{p2}{left})),  'a' => \$KEYS->{p2}{left},  f => 'ONE_CHAR' },
+			       { 'q' => t("Player 2; turn right (%s)?",keysym_to_char($KEYS->{p2}{right})), 'a' => \$KEYS->{p2}{right}, f => 'ONE_CHAR' },
+			       { 'q' => t("Player 2; fire (%s)?",keysym_to_char($KEYS->{p1}{fire})),  'a' => \$KEYS->{p2}{fire},  f => 'ONE_CHAR' },
+			       { 'q' => t("Player 2; center (%s)?",keysym_to_char($KEYS->{p1}{center})),  'a' => \$KEYS->{p2}{center},  f => 'ONE_CHAR' },
                                { f => 'SPACE' },
-			       { 'q' => t("Toggle fullscreen?"), 'a' => \$KEYS->{misc}{fs}, f => 'ONE_CHAR' },
-			       { 'q' => t("Chat (net/lan game)?"), 'a' => \$KEYS->{misc}{chat}, f => 'ONE_CHAR' },
+			       { 'q' => t("Toggle fullscreen (%s)?",keysym_to_char($KEYS->{misc}{fs})), 'a' => \$KEYS->{misc}{fs}, f => 'ONE_CHAR' },
+			       { 'q' => t("Chat in net game (%s)?",keysym_to_char($KEYS->{misc}{chat})), 'a' => \$KEYS->{misc}{chat}, f => 'ONE_CHAR' },
 			      ],
 		   outro => t("Thanks!"),
 		   erase_background => $back_start

Places

File fb_keys.diff of Package frozen-bubble (Revision 59d4b471271db6c421570f61a9b526b4)

Places