ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/maps/perl/sockpuppet.ext
(Generate patch)

Comparing deliantra/maps/perl/sockpuppet.ext (file contents):
Revision 1.1 by root, Wed Aug 30 05:15:06 2006 UTC vs.
Revision 1.2 by root, Wed Aug 30 06:05:57 2006 UTC

… …
4 on_skill_attack => sub { 4 on_skill_attack => sub {
5 my ($self, $victim) = @_; 5 my ($self, $victim) = @_;
6 6
7 my $stats = $victim->stats; 7 my $stats = $victim->stats;
8 8
9 $stats->exp ($stats->exp * 0.9999); 9 $stats->exp ($stats->exp * 0.99999 - 1)
10 if $stats->exp > 2;
10 11
11 $self->remove; 12 $self->remove;
12 $self->free; 13 $self->free;
13 14
14 cf::override; 15 cf::override;

Diff Legend

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