[ViewVC] Diff of: cvs/AnyEvent/lib/AnyEvent/Impl/Glib.pm

Comparing AnyEvent/lib/AnyEvent/Impl/Glib.pm (file contents):
Revision 1.2 by root, Thu Dec 1 18:56:18 2005 UTC vs.
Revision 1.3 by root, Thu Dec 1 22:04:50 2005 UTC

 );
 sub io {
    my ($class, %arg) = @_;
-   my $self = \%arg, $class;
+   my $self = bless \%arg, $class;
    my $rcb = \$self->{cb};
    my @cond;
    push @cond, "in"  if $self->{poll} =~ /r/i;
    push @cond, "out" if $self->{poll} =~ /w/i;
 }
 sub timer {
    my ($class, %arg) = @_;
-   my $self = \%arg, $class;
+   my $self = bless \%arg, $class;
    my $cb = $self->{cb};
    $self->{source} = add Glib::Timeout $self->{after} * 1000, sub {
       $cb->();
       0
    $self
 }
 sub cancel {
    my ($self) = @_;
-   return unless HASH:: eq ref $self;
    remove Glib::Source delete $self->{source} if $self->{source};
    $self->{cb} = undef;
    delete $self->{cb};
 }
 }
 sub condvar {
    my $class = shift;
-   bless \my $x, $class;
+   bless \my $x, AnyEvent::Impl::Glib::CondVar::
 }
-sub broadcast {
+sub AnyEvent::Impl::Glib::CondVar::broadcast {
-   ${$_[0]}++
+   ${$_[0]}++;
 }
-sub wait {
+sub AnyEvent::Impl::Glib::CondVar::wait {
    $maincontext->iteration (1) while !${$_[0]};
 }
 $AnyEvent::MODEL = __PACKAGE__;

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