--- deliantra/Deliantra-Client/DC.pm	2006/08/14 04:34:40	1.114
+++ deliantra/Deliantra-Client/DC.pm	2006/08/15 06:30:05	1.115
@@ -291,7 +291,8 @@
                      my ($entry, $txt) = @_;
                      $::CONN->send ("mark ". pack "N", $self->{tag});
                      $::CONN->send ("command rename to <$txt>");
-                  });
+                  }, $self->{name},
+                  "If you input no name or erase the current custom name, the custom name will be unset");
                }
             ],
             ["apply",   sub { $::CONN->send ("apply $self->{tag}") }],