ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/DC/Protocol.pm
(Generate patch)

Comparing deliantra/Deliantra-Client/DC/Protocol.pm (file contents):
Revision 1.166 by root, Wed Aug 22 22:44:45 2007 UTC vs.
Revision 1.167 by root, Tue Aug 28 01:23:47 2007 UTC

… …
578 $::GAUGES->{sklprg}->set_label ("$name %d%%"); 578 $::GAUGES->{sklprg}->set_label ("$name %d%%");
579 $::GAUGES->{sklprg}->set_value (@$val); 579 $::GAUGES->{sklprg}->set_value (@$val);
580 } 580 }
581} 581}
582 582
583sub macro_send {
584 my ($self, $macro) = @_;
585
586 for my $cmd (@{ $macro->{action} }) {
587 $self->send_command ($cmd);
588 }
589}
590
591sub user_send { 583sub user_send {
592 my ($self, $command) = @_; 584 my ($self, $command) = @_;
593 585
594 $self->{record}->($command) 586 $self->{record}->($command)
595 if $self->{record}; 587 if $self->{record};

Diff Legend

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