- added LogViewer namespace

- added init module for logviewer
- Rpmdragora/init.pm: fixed warn_about_user_mode message alignment
- logviewer.pl: added call to LogViewer::warn_about_user_mode

2 files changed, 35 insertions, 3 deletions

diff --git a/AdminPanel/LogViewer/init.pm b/AdminPanel/LogViewer/init.pm
new file mode 100644
index 00000000..1c961712
--- /dev/null
+++ b/AdminPanel/LogViewer/init.pm
@@ -0,0 +1,31 @@
+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;
diff --git a/AdminPanel/Rpmdragora/init.pm b/AdminPanel/Rpmdragora/init.pm
index 776ee4c0..34581bf2 100644
--- a/AdminPanel/Rpmdragora/init.pm
+++ b/AdminPanel/Rpmdragora/init.pm
@@ -157,9 +157,10 @@ $changelog_first = 1 if $rpmdragora_options{'changelog-first'};
 
 sub warn_about_user_mode() {
     my $title = N("Running in user mode");
-    my $msg = N("You are launching this program as a normal user.
-              You will not be able to perform modifications on the system,
-              but you may still browse the existing database.");
+    my $msg = N("You are launching this program as a normal user.\n".
+                "You will not be able to perform modifications on the system,\n".
+                "but you may still browse the existing database.");
+
     if(($EUID != 0) and (!AdminPanel::rpmdragora::interactive_msg($title, $msg))) {
         return 0;
     }