--- deliantra/gde/GCE/Util.pm	2006/08/14 03:55:50	1.19
+++ deliantra/gde/GCE/Util.pm	2006/08/14 18:52:48	1.20
@@ -158,7 +158,6 @@
 sub arch_is_floor {
    my ($a) = @_;
    my $ar = Crossfire::arch_attr $a;
-   warn "NAME: $ar->{name}\n";
    return (
      (substr $ar->{name}, 0, 5) eq 'Floor'
      or (substr $ar->{name}, 0, 10) eq 'Shop Floor'