[interchange-cvs] interchange - racke modified dist/lib/UI/vars/UI_STD_HEAD

interchange-core@icdevgroup.org interchange-core@icdevgroup.org
Mon Oct 14 08:17:00 2002


User:      racke
Date:      2002-10-14 12:16:01 GMT
Modified:  dist/lib/UI/vars UI_STD_HEAD
Log:
reduced parsing effort for UI_STD_INIT

Revision  Changes    Path
2.31      +4 -4      interchange/dist/lib/UI/vars/UI_STD_HEAD


rev 2.31, prev_rev 2.30
Index: UI_STD_HEAD
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /var/cvs/interchange/dist/lib/UI/vars/UI_STD_HEAD,v
retrieving revision 2.30
retrieving revision 2.31
diff -u -r2.30 -r2.31
--- UI_STD_HEAD	12 Sep 2002 05:09:44 -0000	2.30
+++ UI_STD_HEAD	14 Oct 2002 12:16:01 -0000	2.31
@@ -1,9 +1,9 @@
 Variable UI_STD_INIT <<EOV
-[calc]
+[calcn]
+	# is this browser able to grok DHTML ?
 	my $regex =3D $Tag->var('MV_DHTML_BROWSER', 2) || 'MSIE.*Windows|Mozilla.=
*Gecko';
 	$Scratch->{ui_old_browser} =3D $Session->{browser} !~ /$regex/;
-	return '';
-[/calc][perl]
+
 	# call only once per page
 	return if $Config->{ImageDirOriginal};
=20
@@ -26,7 +26,7 @@
 	}
=20
 	''
-[/perl]
+[/calcn]
 EOV
=20
 Variable UI_STD_HEAD <<EOV