X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=lib%2FMojoFacets.pm;h=cf52becaadf29ceb2f1b2e379df8ded3d35a1bf2;hb=435913283b2941a6e1c20d6b2ac20c7f6895bddd;hp=c2ef3d496b59fb9a966802001483bb245e99fd91;hpb=caeb866383963c3d9a492e8b0b47de355bee5b25;p=MojoFacets.git diff --git a/lib/MojoFacets.pm b/lib/MojoFacets.pm index c2ef3d4..cf52bec 100644 --- a/lib/MojoFacets.pm +++ b/lib/MojoFacets.pm @@ -30,10 +30,10 @@ sub save_action { $path =~ s{/}{.}g; $actions_path .= sprintf '%.4f%s', $time, $path; - my $array = $params->params; - if ( @$array ) { - store $array, $actions_path; - warn "SAVE $actions_path ", -s $actions_path, " bytes params = ", dump($array), $/; + my $hash = $params->to_hash; + if ( $hash ) { + store $hash, $actions_path; + warn "SAVE $actions_path ", -s $actions_path, " bytes params = ", dump($hash), $/; } } }