[frontierkernel-commits] odbs/frontierRoot/system/verbs/builtins/webserver encodeArgs,1.1.1.1,1.2

[creedon <icr...@us...>]

Update of /cvsroot/frontierkernel/odbs/frontierRoot/system/verbs/builtins/webserver
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv25164

Modified Files:
	encodeArgs 
Log Message:
towards more modern standards such as XHTML v1.1

Index: encodeArgs
===================================================================
RCS file: /cvsroot/frontierkernel/odbs/frontierRoot/system/verbs/builtins/webserver/encodeArgs,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -d -r1.1.1.1 -r1.2
*** encodeArgs	26 Mar 2005 19:44:07 -0000	1.1.1.1
--- encodeArgs	18 Oct 2005 16:26:25 -0000	1.2
***************
*** 1,3 ****
  FrontierVcsFile:1:scpt:system.verbs.builtins.webserver.encodeArgs
  
! on encodeArgs (adrTable) {
	ÇEncode a table into an http args string.
	local (argString = "");
	on add (name, value) {
		if argstring != "" {
			argString = argString + "&"};
		argString = argString + name + "=" + value};
	for i = 1 to sizeOf (adrTable^) {
		local (name = nameOf (adrTable^ [i]));
		local (value = string (adrTable^ [i]));
		name = string.urlEncode (name);
		value = string.urlEncode (value);
		name = string.replaceAll (name, "%20", "+");
		value = string.replaceAll (value, "%20", "+");
		add (name, value)};
	return (argString)}
\ No newline at end of file
--- 1,3 ----
  FrontierVcsFile:1:scpt:system.verbs.builtins.webserver.encodeArgs
  
! on encodeArgs (adrTable, flEncodeAmpersand = false) {
	ÇChanges
		Ç10/14/05; 2:05:06 AM by TAC
			Çadded flEncodeAmpersand parameter, needed to produce XHTML v1.1 compliant urls
		ÇEncode a table into an http args string.
	local (argString = "");
	on add (name, value) {
		local {
			s};
		bundle { // set s
			if flEncodeAmpersand {
				s = "&"}
			else {
				s = "&"}};
		if argstring != "" {
			argString = argString + s};
		argString = argString + name + "=" + value};
	for i = 1 to sizeOf (adrTable^) {
		local (name = nameOf (adrTable^ [i]));
		local (value = string (adrTable^ [i]));
		name = string.urlEncode (name);
		value = string.urlEncode (value);
		name = string.replaceAll (name, "%20", "+");
		value = string.replaceAll (value, "%20", "+");
		add (name, value)};
	return (argString)}
\ No newline at end of file