… | |
… | |
1862 | |
1862 | |
1863 | (my $path = $_[0]{path}) =~ s/\//$PATH_SEP/go; |
1863 | (my $path = $_[0]{path}) =~ s/\//$PATH_SEP/go; |
1864 | "$UNIQUEDIR/$path" |
1864 | "$UNIQUEDIR/$path" |
1865 | } |
1865 | } |
1866 | |
1866 | |
1867 | # and all this just because we cannot iterate over |
|
|
1868 | # all maps in C++... |
|
|
1869 | sub change_all_map_light { |
|
|
1870 | my ($change) = @_; |
|
|
1871 | |
|
|
1872 | $_->change_map_light ($change) |
|
|
1873 | for grep $_->outdoor, values %cf::MAP; |
|
|
1874 | } |
|
|
1875 | |
|
|
1876 | sub decay_objects { |
1867 | sub decay_objects { |
1877 | my ($self) = @_; |
1868 | my ($self) = @_; |
1878 | |
1869 | |
1879 | return if $self->{deny_reset}; |
1870 | return if $self->{deny_reset}; |
1880 | |
1871 | |
… | |
… | |
2042 | |
2033 | |
2043 | unless ($self->{deny_activate}) { |
2034 | unless ($self->{deny_activate}) { |
2044 | $self->decay_objects; |
2035 | $self->decay_objects; |
2045 | $self->fix_auto_apply; |
2036 | $self->fix_auto_apply; |
2046 | $self->update_buttons; |
2037 | $self->update_buttons; |
2047 | cf::cede_to_tick; |
|
|
2048 | $self->set_darkness_map; |
|
|
2049 | cf::cede_to_tick; |
2038 | cf::cede_to_tick; |
2050 | $self->activate; |
2039 | $self->activate; |
2051 | } |
2040 | } |
2052 | |
2041 | |
2053 | $self->{last_save} = $cf::RUNTIME; |
2042 | $self->{last_save} = $cf::RUNTIME; |
… | |
… | |
2804 | id => "party", |
2793 | id => "party", |
2805 | title => "Party", |
2794 | title => "Party", |
2806 | reply => "gsay ", |
2795 | reply => "gsay ", |
2807 | tooltip => "Messages and chat related to your party", |
2796 | tooltip => "Messages and chat related to your party", |
2808 | }, |
2797 | }, |
|
|
2798 | "c/say" => $SAY_CHANNEL, |
|
|
2799 | "c/chat" => $CHAT_CHANNEL, |
2809 | ); |
2800 | ); |
2810 | |
2801 | |
2811 | sub cf::client::send_msg { |
2802 | sub cf::client::send_msg { |
2812 | my ($self, $channel, $msg, $color, @extra) = @_; |
2803 | my ($self, $channel, $msg, $color, @extra) = @_; |
2813 | |
2804 | |