From d9d825578eda13054aac4b8a2a5050f900c81628 Mon Sep 17 00:00:00 2001 From: Yves Duret Date: Fri, 10 Aug 2001 10:20:53 +0000 Subject: calendar added more --- logdrake | 39 ++++++++++++++++++++++----------------- 1 file changed, 22 insertions(+), 17 deletions(-) (limited to 'logdrake') diff --git a/logdrake b/logdrake index 53c4c507..6fc82b96 100755 --- a/logdrake +++ b/logdrake @@ -150,38 +150,40 @@ gtkadd($window, gtkpack__(new Gtk::VBox(0,5), # _("Show lines"), gtkpack__(new Gtk::HBox(0,5), - _("matching"), - $e_yes = new Gtk::Entry(), - _("but not matching"), - $e_no = new Gtk::Entry() + _("matching"), $e_yes = new Gtk::Entry(), + _("but not matching"), $e_no = new Gtk::Entry() ) ), _("tips: you can use OR"), gtkpack_(new Gtk::HBox(0,0), - 1, if_ (!$::isFile, gtkpack (gtkset_border_width(new Gtk::VBox(0,0),0), - map { ${"b_". $_} = new Gtk::CheckButton($files{$_}{desc}) } keys %files, - ) + 1, if_ (!$::isFile, gtkadd(gtkset_border_width(new Gtk::Frame(_("Choose file")),5), + gtkpack (gtkset_border_width(new Gtk::VBox(0,0),0), + map { ${"b_". $_} = new Gtk::CheckButton($files{$_}{desc}) } keys %files, + ) + ) + ), - 0, gtkpack__(gtkset_border_width(new Gtk::VBox(0,0),10), - $cal_butt, - $cal - ) + 0, gtkadd(gtkset_border_width(new Gtk::Frame(_("Calendar")),5), + gtkpack__(gtkset_border_width(new Gtk::VBox(0,0),5), + $cal_butt, $cal + ) + ) ), gtksignal_connect(new Gtk::Button(_("search")), clicked => \&search) ) ), 1, gtkadd(new Gtk::Frame(_("Content of the file")), - createScrolledWindow(my $log_text = new Gtk::Text(undef, undef)) + 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)}) - ) + 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)}) + ) ) - + ); - +gtkset_usize($log_text,200,200) if !$::isEmbedded; $window->realize; $window->show_all(); search() if ($::isFile); @@ -357,6 +359,9 @@ sub destroy_window { # log # $Log$ +# Revision 1.17 2001/08/10 10:20:53 yduret +# calendar added more +# # Revision 1.16 2001/08/10 09:28:35 yduret # added calendar functionnality # -- cgit v1.2.1