From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Fri, 25 Jun 2010 16:43:53 +0000 (+0200)
Subject: use $key and $value to name code file
X-Git-Url: http://git.rot13.org/?p=MojoFacets.git;a=commitdiff_plain;h=9f26868cd9effb9c93ceb3afd4c7cc07c4d534eb

use $key and $value to name code file
---

diff --git a/lib/MojoFacets/Data.pm b/lib/MojoFacets/Data.pm
index d967f97..ba724b1 100644
--- 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 );