[ViewVC] Diff of: cvs/CV/bin/cv

Comparing CV/bin/cv (file contents):
Revision 1.12 by root, Wed Nov 5 01:30:33 2003 UTC vs.
Revision 1.16 by root, Fri Nov 7 02:41:06 2003 UTC

 use Gtk2 -init;
 use Gtk2::Gdk::Keysyms;
 use Gtk2::CV::ImageWindow;
 use Gtk2::CV::Schnauzer;
+use Gtk2::CV;
+Gtk2::Rc->parse (Gtk2::CV::find_rcfile "gtkrc");
 my $viewer;
 my $schnauzer;
 sub new_schnauzer {
    $s->signal_connect (activate => sub { $viewer->load_image ($_[1]) });
    $s->signal_connect_after (key_press_event => \&std_keys);
    $s->set_dir (".");
-   $w->show_all;
    $s;
 }
+$schnauzer = new_schnauzer;
+my $mainwin = $schnauzer->get_toplevel;
 sub std_keys {
    my $key = $_[1]->keyval;
    my $state = $_[1]->state;
    my $ctrl = grep $_ eq "control-mask", @$state;
    if ($key == $Gtk2::Gdk::Keysyms{q}) {
       main_quit Gtk2;
    } elsif ($ctrl && $key == $Gtk2::Gdk::Keysyms{v}) {
-      new_schnauzer;
+      new_schnauzer->get_toplevel->show_all;
    } else {
+      $mainwin->show_all;
       $schnauzer->handle_key ($key, $state);
    }
    1;
 }
 $viewer = new Gtk2::CV::ImageWindow;
+$viewer->set_title ("CV");
 $viewer->signal_connect (key_press_event => \&std_keys);
 $viewer->signal_connect (delete_event => sub { main_quit Gtk2 });
-$schnauzer = new_schnauzer;
+$viewer->signal_connect (button3_press_event => sub {
+   $mainwin->visible
+      ? $mainwin->hide
+      : $mainwin->show_all;
+});
 if (@ARGV) {
    $viewer->load_image ($ARGV[0]);
    if (@ARGV > 1) {

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines