From 7012db8ce579ffc5fc43dec76425f88fcd517768 Mon Sep 17 00:00:00 2001
From: Kiyoshi Aman <sheila@vulpine.house>
Date: Thu, 27 Oct 2022 01:46:42 -0700
Subject: [PATCH] Chessa::URI::Plugin::Default: remove unused code
---
scripts/Chessa/URI/Plugin/Default.pm | 10 +---------
1 file changed, 1 insertion(+), 9 deletions(-)
diff --git a/scripts/Chessa/URI/Plugin/Default.pm b/scripts/Chessa/URI/Plugin/Default.pm
index 7f35f0e..01d199b 100644
--- a/scripts/Chessa/URI/Plugin/Default.pm
+++ b/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 {
--
GitLab