use $key and $value to name code file

[MojoFacets.git] / lib / MojoFacets / Data.pm

diff --git a/lib/MojoFacets/Data.pm b/lib/MojoFacets/Data.pm
index d967f97..ba724b1 100644 (file)
--- a/lib/MojoFacets/Data.pm
+++ b/lib/MojoFacets/Data.pm
@@ -819,6 +819,10 @@ sub items {
        join(',', @added_columns);
 
        $code_depends ||= $code_description; # self-modifing
+       if ( ! $code_depends && $out ) {
+               $code_depends = $key;
+               $code_description = $value;
+       }
 
        warn "# test_changed ",dump( $test_changed, $code_depends, $code_description );