From 864e5f2929f60dc69b3ce68b7a2479ceb204baa7 Mon Sep 17 00:00:00 2001
From: Yves Duret <yduret@mandriva.com>
Date: Fri, 10 Aug 2001 01:46:05 +0000
Subject: corrected vnew usage (thc gc)

---
 logdrake | 16 +++++++++++-----
 1 file changed, 11 insertions(+), 5 deletions(-)

(limited to 'logdrake')

diff --git a/logdrake b/logdrake
index 0a01f6b0..10fe3e60 100755
--- a/logdrake
+++ b/logdrake
@@ -53,16 +53,14 @@ if ($::isEmbedded) {
   print "mcc pid\t$::CCPID\n";
 }
 
-my $in = vnew interactive('su');
+my $in = 'interactive'->vnew('su', 'default');
 
 local $_ = join '', @ARGV;
 
 /-h/ and die sprintf( _("usage: logdrake [--version]\n"));
 /-version/ and die 'version: $Id$ '."\n";
 
-my $h=`hostname -s`;
-chop($h);
-
+my $h=chomp_(`hostname -s`);
 
 my $window = $::isEmbedded ? new Gtk::Plug ($::XID) : new Gtk::Window -toplevel;
 $window->signal_connect( delete_event => sub { $::isEmbedded ? kill(USR1, $::CCPID) : Gtk->exit(0) });
@@ -162,9 +160,14 @@ gtkadd($window,
 			 ),
 		1, gtkadd(new Gtk::Frame(_("Content of the file")),
 			  createScrolledWindow(my $log_text = new Gtk::Text(undef, undef)) 
-			 )
+			 ),
+		0, gtkadd (gtkset_layout(new Gtk::HButtonBox,-end),
+			gtksignal_connect(new Gtk::Button (_("OK")), clicked=>sub{updateInit();updateAutologin();updateAurora();$::isEmbedded ? kill(USR1,$::CCPID) : Gtk->exit(0)}),
+			gtksignal_connect(new Gtk::Button ($::isEmbedded ? _("Cancel") : _("Quit")), clicked => sub {$::isEmbedded ? kill(USR1, $::CCPID) : Gtk->exit(0)})
+		       )
 		
 	       )
+
       );
 
 $window->realize;
@@ -337,6 +340,9 @@ sub destroy_window {
 
 # log
 # $Log$
+# Revision 1.15  2001/08/10 01:46:05  yduret
+# corrected vnew usage (thc gc)
+#
 # Revision 1.14  2001/08/06 14:58:12  yduret
 # added isFile mode for daminounet
 #
-- 
cgit v1.2.1