From 6e2f82f57449d6b1c788f1290d281a776c70af5c Mon Sep 17 00:00:00 2001 From: Angelo Naselli Date: Sat, 8 Mar 2014 18:16:01 +0100 Subject: Removed old log viewer (no more syslog) --- lib/AdminPanel/LogViewer/init.pm | 31 ------------------------------- 1 file changed, 31 deletions(-) delete mode 100644 lib/AdminPanel/LogViewer/init.pm (limited to 'lib/AdminPanel/LogViewer/init.pm') diff --git a/lib/AdminPanel/LogViewer/init.pm b/lib/AdminPanel/LogViewer/init.pm deleted file mode 100644 index 1c961712..00000000 --- a/lib/AdminPanel/LogViewer/init.pm +++ /dev/null @@ -1,31 +0,0 @@ -package AdminPanel::LogViewer::init; - -use strict; -use warnings; -use diagnostics; -use English; -use lib qw(/usr/lib/libDrakX); -use common; -use AdminPanel::Shared; -use base qw(Exporter); - -our @EXPORT = qw(warn_about_user_mode - interactive_msg); - -sub interactive_msg { - my ($title, $contents) = @_; - return ask_YesOrNo($title, $contents); -} - -sub warn_about_user_mode() { - my $title = N("Running in user mode"); - my $msg = N("You are launching this program as a normal user.\n". - "You will not be able to read system logs which you do not have rights to,\n". - "but you may still browse all the others."); - if(($EUID != 0) and (!interactive_msg($title, $msg))) { - return 0; - } - return 1; -} - -1; -- cgit v1.2.1