[interchange-cvs] interchange - heins modified dist/lib/UI/ui.cfg

interchange-cvs at icdevgroup.org interchange-cvs at icdevgroup.org
Mon Jul 28 18:08:00 EDT 2003


User:      heins
Date:      2003-07-28 21:08:03 GMT
Modified:  dist/lib/UI ui.cfg
Log:
* Use ic- qualifier to prevent namespace clashes.

Revision  Changes    Path
2.14      +3 -3      interchange/dist/lib/UI/ui.cfg


rev 2.14, prev_rev 2.13
Index: ui.cfg
===================================================================
RCS file: /var/cvs/interchange/dist/lib/UI/ui.cfg,v
retrieving revision 2.13
retrieving revision 2.14
diff -u -r2.13 -r2.14
--- ui.cfg	27 Jul 2003 20:51:02 -0000	2.13
+++ ui.cfg	28 Jul 2003 21:08:03 -0000	2.14
@@ -110,7 +110,7 @@
 		while($data =~ m{\[(\w+)\](.*?)\[/\1]}sg) {
 			my $parm = $1;
 			my $val = HTML::Entities::encode_entities($2);
-			push @headers, qq{<meta name="component" content="$i;$parm;$val">};
+			push @headers, qq{<meta name="ic-component" content="$i;$parm;$val">};
 		}
 	}
 
@@ -129,7 +129,7 @@
 		my $val = HTML::Entities::encode_entities($3);
 		next if $parm eq 'meta_header';
 		next if $parm eq 'page_title';
-		push @headers, qq{<meta name="setting" content="$type;$parm;$val">};
+		push @headers, qq{<meta name="ic-setting" content="$type;$parm;$val">};
 	}
 
 	my $meta_string = join "\n", @headers;
@@ -254,7 +254,7 @@
 			my($hname, $value) = @_;
 #::logDebug("Calling compcheck name=$hname value=$value");
 			$hname = lc $hname;
-			return unless $hname =~ /^x-meta-(\w+)/;
+			return unless $hname =~ /^x-meta-ic-(\w+)/;
 			$hname = $1;
 			if($hname eq 'component') {
 #::logDebug("doing $value");







More information about the interchange-cvs mailing list