[frontierkernel-commits] odbs/mainResponderRoot/mainResponder/resources/frontierIcons default,1.1,1.2,

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

Update of /cvsroot/frontierkernel/odbs/mainResponderRoot/mainResponder/resources/frontierIcons
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23615

Modified Files:
	default 
Log Message:
towards XHTML compatibility

added support for displaying jpeg and png images

Index: default
===================================================================
RCS file: /cvsroot/frontierkernel/odbs/mainResponderRoot/mainResponder/resources/frontierIcons/default,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** default	8 Sep 2005 05:52:33 -0000	1.1
--- default	17 Feb 2006 20:02:18 -0000	1.2
***************
*** 1,3 ****
  FrontierVcsFile:1:scpt:mainResponder.resources.frontierIcons.default
  
! local (adr, ct = 0, hw, n, s);
local (htmlText = "[[frontierIcons]]");

for adr in @mainResponder.resources.frontierIcons {
	n = nameOf (adr^);
	case n {
		"default" {
			continue}};
	hw = html.getGifHeightWidth (adr);
	s = s + "<img src=\"" + config.mainresponder.prefs.baseUrl + "resources/frontierIcons/" + n + "\" height=\"" + hw [1] + "\" width=\"" + hw [2] + "\">\r";
	if mod (++ct, 10) == 0 {
		s = s + "<br/>"}};
Çs = s + "<br/><br/>Number of icons: " + ct + "."
htmlText = string.replace (htmlText, "[[frontierIcons]]", s);
return (htmlText)
\ No newline at end of file
--- 1,3 ----
  FrontierVcsFile:1:scpt:mainResponder.resources.frontierIcons.default
  
! ÇChanges
	Ç2/17/06; 11:14:22 AM by TAC
		Çtowards XHTML compatibility
		Çadded support for displaying jpeg and png images
	Ç7/6/05; 8:22:04 PM by TAC
		Çcreated

local (adr, ct = 0, hw, n, s);
local (htmlText = "[[frontierIcons]]");

for adr in @mainResponder.resources.frontierIcons {
	n = nameOf (adr^);
	
	case n {
		"default" {
			continue}};
	
	case user.webserver.prefs.type2MIME.[getBinaryType (adr^)] {
		"image/png" {
			hw = html.getPngHeightWidth (adr)};
		"image/jpeg" {
			hw = html.getJpegHeightWidth (adr)};
		"image/gif" {
			hw = html.getGifHeightWidth (adr)}};
	
	s = s + "<img alt=\"" + n + "\" src=\"" + config.mainresponder.prefs.baseUrl + "resources/frontierIcons/" + n + "\" height=\"" + hw [1] + "\" width=\"" + hw [2] + "\" />\r";
	
	if mod (++ct, 10) == 0 {
		s = s + "<br />"};
	};
Çs = s + "<br /><br />Number of icons: " + ct + "."
htmlText = string.replace (htmlText, "[[frontierIcons]]", s);
return (htmlText)
\ No newline at end of file