[frontierkernel-commits] odbs/frontierRoot/system/verbs/builtins/Frontier/clickers typeosax,1.1.1.1,1.1.1.1.4.1

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

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

Modified Files:
      Tag: commercial_suite_project-branch
	typeosax 
Log Message:
use aeTerminology Suite to parse osax

Index: typeosax
===================================================================
RCS file: /cvsroot/frontierkernel/odbs/frontierRoot/system/verbs/builtins/Frontier/clickers/typeosax,v
retrieving revision 1.1.1.1
retrieving revision 1.1.1.1.4.1
diff -C2 -d -r1.1.1.1 -r1.1.1.1.4.1
*** typeosax	26 Mar 2005 19:42:48 -0000	1.1.1.1
--- typeosax	10 Nov 2005 00:19:37 -0000	1.1.1.1.4.1
***************
*** 1,3 ****
  FrontierVcsFile:1:scpt:system.verbs.builtins.Frontier.clickers.typeosax
  
! on typeosax (path) {
	if applescripts.loadOSAX (path) != nil {
		Frontier.findertofront = false};
	return (true)}
\ No newline at end of file
--- 1,3 ----
  FrontierVcsFile:1:scpt:system.verbs.builtins.Frontier.clickers.typeosax
  
! on typeosax (path) {
	ÇChanges
		Ç11/9/05; 11:23:49 AM by TAC
			Çuse aeTerminology Suite to parse osax
	
	local (adrTerminologyTable);
	
	if aeTerminology.initializeNewTerminologyTable (@path, @adrTerminologyTable, @system.extensions, {'osax'}, newTerminologyNamePrompt: "New system.extensions table item name:", replaceTerminologyPrompt: "A system.extensions table item with the name of \"[[terminologyname]]\" already exists.  Are you sure you want to replace it?") {
		
		window.about ();
		msg ("aeTerminology: ");
		
		aeTerminology.parseAete (path, adrTerminologyTable)};
	
	Frontier.findertofront = false;
	
	return (true)}
\ No newline at end of file