Skip to content

Commit 14e087c

Browse files
committed
Revert "Add distibution name to checkboxes to delete"
This reverts commit 5d4a1b6.
1 parent c190320 commit 14e087c

File tree

2 files changed

+2
-7
lines changed

2 files changed

+2
-7
lines changed

lib/pause_2017/PAUSE/Web/Controller/User/Files.pm

Lines changed: 1 addition & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -4,7 +4,6 @@ use Mojo::Base "Mojolicious::Controller";
44
use HTTP::Date ();
55
use File::pushd;
66
use PAUSE ();
7-
use CPAN::DistnameInfo;
87

98
sub show {
109
my $c = shift;
@@ -173,14 +172,10 @@ sub delete {
173172
warn "ALERT: Could not stat f[$f]: $!";
174173
next;
175174
}
176-
my $tmpf = $f;
177-
$tmpf =~ s/\.(?:readme|meta)$/.tar.gz/;
178-
my $info = CPAN::DistnameInfo->new($tmpf);
179-
my $dist = $info->dist;
180175
my $blurb = $deletes{$f} ?
181176
$c->scheduled($whendele{$f}) :
182177
HTTP::Date::time2str((stat _)[9]);
183-
$files{$f} = {stat => -s _, blurb => $blurb, indexed => $indexed->{$f}, dist => $dist };
178+
$files{$f} = {stat => -s _, blurb => $blurb, indexed => $indexed->{$f} };
184179
$pause->{deleting_indexed_files} = 1 if $deletes{$f} && $indexed->{$f};
185180
}
186181
$pause->{files} = \%files;

lib/pause_2017/templates/user/files/delete.html.ep

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -29,7 +29,7 @@
2929
<tbody class="list">
3030
% for my $file (sort keys %$files) {
3131
<tr>
32-
<td class="checkbox"><%= check_box "pause99_delete_files_FILE" => $file, 'data-dist' => $files->{$file}{dist} %></td>
32+
<td class="checkbox"><%= check_box "pause99_delete_files_FILE" => $file %></td>
3333
% if ($files->{$file}{indexed}) {
3434
<td class="file indexed"><%= $file %> [indexed]</td>
3535
% } else {

0 commit comments

Comments
 (0)