Chessa::URI::Plugin::Default: remove unused code

scripts/Chessa/URI/Plugin/Default.pm

@@ -13,9 +13,6 @@ use Encode qw(encode);
 use XML::XPath;
 
 use constant {
-    SZ_KILOBYTE => 1024,
-    SZ_MEGABYTE => 1024 ** 2,
-    SZ_GIGABYTE => 1024 ** 3,
     name        => 'Default',
 };
 
@@ -108,7 +105,7 @@ sub head {
             },
         );
     } else {
-        return if (!defined($size) || (($size < SZ_MEGABYTE) && ($type =~ m!^image/!)));
+        return if (!defined($size) || ($size < (10 * (1024 **2 ))));
         $on_info->(
             $self->{msg}('Type', $type) . ' ' .
             $self->{msg}('Size', $self->humanize($size)) . 
@@ -117,11 +114,6 @@ sub head {
     }
 }
 
-my @scale = (
-    [SZ_GIGABYTE, 'GB'],
-    [SZ_MEGABYTE, 'MB'],
-    [SZ_KILOBYTE, 'kB'],
-);
 my @units = split //, 'kMGTPEZY';
 
 sub humanize {