135/netdisco
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix previous commit

Browse Source 
* revert unwanted commit of bogus Web/Plugin/Device/Modules.pm
 * commit actual fix for #710
This commit is contained in:
Christian Ramseyer
2020-04-25 17:32:01 +02:00
parent 5663f84917
commit dcb45e4cad
2 changed files with 12 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
lib/App/Netdisco/Web/Plugin/Device/Modules.pm
View File

@@ -17,22 +17,9 @@ ajax '/ajax/content/device/modules' => require_login sub {
->search_for_device($q) or send_error('Bad device', 400);
my @set = $device->modules->search({}, {order_by => { -asc => [qw/parent class pos index/] }});
# sort modules (empty set would be a 'no records' msg)
my $results = &App::Netdisco::Util::Web::sort_modules( \@set );
return unless scalar %$results;
use Data::Dumper;
#print STDERR "-----------\n"; print STDERR Dumper($results);
print STDERR "-----------\n";
print STDERR Dumper($results->{root}) ."\n";
print STDERR "-----------\n";
my $id = 1;
print STDERR Dumper($results->{$id}{module}->name) ."\n";
print STDERR Dumper($results->{$id}{module}->index) ."\n";
print STDERR Dumper($results->{$id}{module}->parent) ."\n";
print STDERR Dumper($results->{$id}->{children}) ."\n";
print STDERR "-----------\n";
content_type('text/html');
template 'ajax/device/modules.tt', {