[interchange-cvs] interchange - racke modified dist/lib/UI/usertag/regenerate.tag

[interchange-core@interchange.redhat.com]

User:      racke
Date:      2001-10-07 11:55:18 GMT
Modified:  dist/lib/UI/usertag regenerate.tag
Log:
new configuration variables StaticIndex and StaticSessionDefault

Revision  Changes    Path
2.2       +4 -0      interchange/dist/lib/UI/usertag/regenerate.tag


rev 2.2, prev_rev 2.1
Index: regenerate.tag
===================================================================
RCS file: /anon_cvs/repository/interchange/dist/lib/UI/usertag/regenerate.tag,v
retrieving revision 2.1
retrieving revision 2.2
diff -u -r2.1 -r2.2
--- regenerate.tag	2001/10/05 16:17:07	2.1
+++ regenerate.tag	2001/10/07 11:55:18	2.2
@@ -38,6 +38,10 @@
 		'values'	=> { %{$Vend::Cfg->{ValuesDefault}} },
 		'carts'		=> {main => []},
 	};
+	my ($key, $value);
+	while (($key, $value) = each (%{$Vend::Cfg->{StaticSessionDefault}})) {
+        $Vend::Session->{$key} = $value;
+	}
 	$CGI::values = ();
 	($Vend::Session->{arg} = $Vend::Argument = $CGI::values{mv_arg} = $regen_arg)
 		if $regen_arg;