1# -- 2# Copyright (C) 2001-2020 OTRS AG, https://otrs.com/ 3# -- 4# This software comes with ABSOLUTELY NO WARRANTY. For details, see 5# the enclosed file COPYING for license information (GPL). If you 6# did not receive this file, see https://www.gnu.org/licenses/gpl-3.0.txt. 7# -- 8 9package Kernel::System::SupportDataCollector::Plugin::OTRS::UI::SpecialStats; 10 11use strict; 12use warnings; 13 14use parent qw(Kernel::System::SupportDataCollector::PluginBase); 15 16use Kernel::Language qw(Translatable); 17 18our @ObjectDependencies = ( 19 'Kernel::Config', 20 'Kernel::System::DB', 21 'Kernel::System::User', 22); 23 24sub GetDisplayPath { 25 return Translatable('OTRS') . '/' . Translatable('UI - Special Statistics'); 26} 27 28sub Run { 29 my $Self = shift; 30 31 my %PreferenceMap = ( 32 UserNavBarItemsOrder => Translatable('Agents using custom main menu ordering'), 33 AdminNavigationBarFavourites => Translatable('Agents using favourites for the admin overview'), 34 ); 35 36 for my $Preference ( sort keys %PreferenceMap ) { 37 38 my %FoundPreferences = $Kernel::OM->Get('Kernel::System::User')->SearchPreferences( 39 Key => $Preference, 40 ); 41 42 $Self->AddResultInformation( 43 Identifier => $Preference, 44 Label => $PreferenceMap{$Preference}, 45 Value => scalar keys %FoundPreferences, 46 ); 47 } 48 49 return $Self->GetResults(); 50} 51 521; 53