--- deliantra/Deliantra-Client/DC/MapWidget.pm	2006/07/23 02:44:05	1.77
+++ deliantra/Deliantra-Client/DC/MapWidget.pm	2006/07/24 12:25:09	1.79
@@ -5,7 +5,9 @@
 
 use List::Util qw(min max);
 
+use CFClient;
 use CFClient::OpenGL;
+use CFClient::UI;
 
 our @ISA = CFClient::UI::Base::;
 
@@ -115,6 +117,15 @@
                   : "Enable automatic pickup",
                sub { $::PICKUP_ENABLE->toggle }
             ],
+            ["Quit",
+               sub {
+                  if ($::CONN) {
+                     &::open_quit_dialog;
+                  } else {
+                     exit;
+                  }
+               }
+            ],
          ],
       )->popup ($ev);
    }
@@ -527,7 +538,7 @@
          if ($ev->{button} == 3) {
             (new CFClient::UI::Menu
                items => [
-                  ["bind <i>" . (CFClient::UI::Label::escape $self->{select}) . "</i> to a key"
+                  ["bind <i>" . (CFClient::asxml $self->{select}) . "</i> to a key"
                    => sub { $::BIND_EDITOR->do_quick_binding ([$self->{select}], sub { $entry->grab_focus }) }]
                ],
             )->popup ($ev);