From 203fe77dac0199ad90ca280cf9a28443206c5355 Mon Sep 17 00:00:00 2001 From: damien Date: Tue, 21 Aug 2001 17:00:42 +0000 Subject: log updatede --- perl-install/standalone/net_monitor | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'perl-install/standalone/net_monitor') diff --git a/perl-install/standalone/net_monitor b/perl-install/standalone/net_monitor index 9e1397975..3fa961e32 100755 --- a/perl-install/standalone/net_monitor +++ b/perl-install/standalone/net_monitor @@ -121,7 +121,11 @@ gtkadd($window1, 1, gtksignal_connect(my $button_connect = new Gtk::Button(), clicked => \&connection), 0, new Gtk::VSeparator, 0, gtkpack(new Gtk::VBox(0,5), - gtksignal_connect(new Gtk::Button(_("Logs")), clicked => sub { system("/usr/sbin/logdrake --file /var/log/messages &") }), + gtksignal_connect(new Gtk::Button(_("Logs")), clicked => sub { + -e "/usr/sbin/logdrake" + ? system('/usr/sbin/logdrake --file /var/log/messages &') + : system('/usr/X11R6/bin/xvt -e "tail -f /var/log/messages " &') + }), gtksignal_connect(my $button_close = new Gtk::Button(_("Close")), clicked => sub { Gtk->exit(0) }), ) ) -- cgit v1.2.1