--- deliantra/Deliantra-Client/DC.pm	2006/07/02 18:52:04	1.96
+++ deliantra/Deliantra-Client/DC.pm	2006/07/14 17:35:34	1.99
@@ -237,6 +237,12 @@
    ]
 }
 
+package CFClient::Layout;
+
+$CFClient::OpenGL::SHUTDOWN_HOOK{"CFClient::Layout"} = sub {
+   reset_glyph_cache;
+};
+
 package CFClient::Item;
 
 use strict;
@@ -329,6 +335,12 @@
          my @menu_items = (
             ["examine", sub { $::CONN->send ("examine $self->{tag}") }],
             ["mark",    sub { $::CONN->send ("mark ". pack "N", $self->{tag}) }],
+            ["ignite/thaw",  # first try of an easier use of flint&steel
+               sub {
+                  $::CONN->send ("mark ". pack "N", $self->{tag});
+                  $::CONN->send ("command apply flint and steel");
+               }
+            ],
             ["apply",   sub { $::CONN->send ("apply $self->{tag}") }],
             (
                $self->{flags} & F_LOCKED