--- deliantra/Deliantra-Client/DC/Macro.pm 2006/12/09 23:06:39 1.5 +++ deliantra/Deliantra-Client/DC/Macro.pm 2006/12/16 16:14:34 1.6 @@ -271,9 +271,8 @@ $recording = $::CONN && !$recording; if ($recording) { $widget->set_text ("Stop Recording"); - my $action = $macro->{action} ||= []; $::CONN->record (sub { - push @$action, $_[0]; + push @{ $macro->{action} }, $_[0]; $textedit->set_text (macro_to_text $macro); }) if $::CONN; } else {