[frontierkernel-commits] odbs/frontierRoot/system/verbs/builtins/file getPrefsSubfolder,1.1.1.1,1.2

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

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

Modified Files:
	getPrefsSubfolder 
Log Message:
changed UserLand folder to Frontier folder for open source release

Index: getPrefsSubfolder
===================================================================
RCS file: /cvsroot/frontierkernel/odbs/frontierRoot/system/verbs/builtins/file/getPrefsSubfolder,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -d -r1.1.1.1 -r1.2
*** getPrefsSubfolder	26 Mar 2005 19:42:46 -0000	1.1.1.1
--- getPrefsSubfolder	13 Jun 2005 23:45:26 -0000	1.2
***************
*** 1,3 ****
  FrontierVcsFile:1:scpt:system.verbs.builtins.file.getPrefsSubfolder
  
! on getPrefsSubfolder (foldername) {
	Ç10/31/97 at 8:42:40 AM by DW -- moved to file.getPrefsSubfolder
		ÇFor Windows, I created a Preferences folder in the same folder as Frontier.root, if it doesn't exist.
		ÇCan't do it in the same folder as the Frontier app because frontier.getProgramPath isn't working.
		ÇNot sure of Windows culture on this, feedback is welcome.
	local (pathchar = file.getPathChar ());
	case sys.os () {
		"MacOS" {
			local (prefsfolder = file.getSpecialFolderPath ("", "Preferences", true));
			local (userlandfolder = prefsfolder + "UserLand" + pathchar);
			file.sureFolder (userlandfolder);
			local (subfolder = userlandfolder + foldername + pathchar);
			file.sureFolder (subfolder);
			return (subfolder)}}
	else { Çan OS with no preferences folder culture
		local (prefsfolder, subfolder);
		prefsfolder = file.folderFromPath (frontier.getFilePath ()) + "Preferences" + pathchar;
		file.sureFolder (prefsfolder);
		if string.lower (foldername) == "preferences" { // caller doesn't want a sub-folder
			ÇMonday, January 19, 1998 at 5:32:55 PM by PBS
			return (prefsfolder)};
		subfolder = prefsfolder + foldername + pathchar;
		file.sureFolder (subfolder);
		return (subfolder)}}
\ No newline at end of file
--- 1,3 ----
  FrontierVcsFile:1:scpt:system.verbs.builtins.file.getPrefsSubfolder
  
! on getPrefsSubfolder (foldername) {
	ÇChanges
		Ç12/4/04; 3:31:27 PM by TAC
			Çchanged UserLand folder to Frontier folder for open source release
		Ç10/31/97 at 8:42:40 AM by DW -- moved to file.getPrefsSubfolder
			ÇFor Windows, I created a Preferences folder in the same folder as Frontier.root, if it doesn't exist.
			ÇCan't do it in the same folder as the Frontier app because frontier.getProgramPath isn't working.
			ÇNot sure of Windows culture on this, feedback is welcome.
	local (pathchar = file.getPathChar ());
	case sys.os () {
		"MacOS" {
			local (prefsfolder = file.getSpecialFolderPath ("", "Preferences", true));
			local (frontierFolder = prefsfolder + "Frontier" + pathchar);
			file.sureFolder (frontierFolder);
			local (subfolder = frontierFolder + foldername + pathchar);
			file.sureFolder (subfolder);
			return (subfolder)}}
	else { Çan OS with no preferences folder culture
		local (prefsfolder, subfolder);
		prefsfolder = file.folderFromPath (frontier.getFilePath ()) + "Preferences" + pathchar;
		file.sureFolder (prefsfolder);
		if string.lower (foldername) == "preferences" { // caller doesn't want a sub-folder
			ÇMonday, January 19, 1998 at 5:32:55 PM by PBS
			return (prefsfolder)};
		subfolder = prefsfolder + foldername + pathchar;
		file.sureFolder (subfolder);
		return (subfolder)}}
\ No newline at end of file