[interchange] Add tree-master attribute to [menu] tag.

Stefan Hornburg interchange-cvs at icdevgroup.org
Tue May 29 09:47:54 UTC 2012


commit ab6283630b0e028ecc80e326e3132a73d40b5124
Author: Stefan Hornburg (Racke) <racke at linuxia.de>
Date:   Tue May 29 11:41:42 2012 +0200

    Add tree-master attribute to [menu] tag.

 lib/Vend/Menu.pm |    8 ++++----
 1 files changed, 4 insertions(+), 4 deletions(-)
---
diff --git a/lib/Vend/Menu.pm b/lib/Vend/Menu.pm
index 5e32574..4e15b28 100644
--- a/lib/Vend/Menu.pm
+++ b/lib/Vend/Menu.pm
@@ -418,7 +418,7 @@ EOF
 	my %defaults = (
 				start       => $opt->{tree_selector} || 'Products',
 				table       => $::Variable->{MV_TREE_TABLE} || 'tree',
-				master      => 'parent_fld',
+				master      => $opt->{tree_master} || 'parent_fld',
 				subordinate => 'code',
 				autodetect  => '1',
 				sort        => 'code',
@@ -551,7 +551,7 @@ EOF
 			start       => $opt->{tree_selector} || $opt->{name},
 			file		=> $opt->{file},
 			table       => $opt->{table} || $::Variable->{MV_TREE_TABLE} || 'tree',
-			master      => 'parent_fld',
+			master      => $opt->{tree_master} || 'parent_fld',
 			subordinate => 'code',
 			autodetect  => '1',
 			no_open		=> 1,
@@ -946,7 +946,7 @@ EOF
 	my %o = (
 			start       => $opt->{tree_selector} || 'Products',
 			table       => $opt->{table} || $::Variable->{MV_TREE_TABLE} || 'tree',
-			master      => 'parent_fld',
+			master      => $opt->{tree_master} || 'parent_fld',
 			file		=> $opt->{file},
 			subordinate => 'code',
 			autodetect  => '1',
@@ -1466,7 +1466,7 @@ EOF
 	my %o = (
 			start       => $opt->{tree_selector} || 'Products',
 			table       => $opt->{table} || $::Variable->{MV_TREE_TABLE} || 'tree',
-			master      => 'parent_fld',
+			master      => $opt->{tree_master} || 'parent_fld',
 			file		=> $opt->{file},
 			subordinate => 'code',
 			autodetect  => '1',



More information about the interchange-cvs mailing list